オブジェクトのエラー1004メソッドの範囲が失敗しましたか？

Question

私はほとんどの場合、既存のデータシートを更新するプロジェクトを完了しました。しかし、私は、任意の提案

ChDir "C:\Users\jiarui.hou.THRUBIT\Desktop" 
Dim aFile As String 
Dim SheetName As String 
aFile = Application.GetOpenFilename(Title:="Select Raw Data File to Import") 
If aFile = "False" Then Exit Sub 
Workbooks.Open Filename:=aFile 

'Returns LAST USED cell 
LastRow = Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row 
LastColumn = Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column 
LastCell = Cells(LastRow, LastColumn).Address 
Range(A1 & ":" & LastCell).Select 'Error 1004:method'Range' of object '_Global' failed 
Selection.Copy 

新しいファイルからインポートしたいデータの範囲を選択するから私を続けているただ一つのエラーはありますか？

Answer 1

あなたが試してみてください：

Range("A1:" & LastCell).Select 

あなたはLastCellにA1から選択することが欠けている場合。引用符がないと、A1はそのコードスニペットで、私のローカルのウィンドウに従った変種に過ぎません。