2015-11-08 75 views
0

通過激活一個Excel工作表中的按鈕,我想打開引用的Excel工作表並選擇範圍,因爲行數和列可能會更改,我一直在嘗試寫入一個動態的代碼來做這個選擇。在嘗試了很多事情之後,xlDown和xlToRight對我來說最有意義,但是我不斷收到錯誤,「對象工作表的方法範圍失敗」。如果我在工作表中使用相同的代碼,它完美的工作,而不是當我在另一個工作表中使用它。已嘗試引用工作簿和工作表。在另一個工作表中選擇動態範圍

Private Sub CommandButton3_Click() 

Workbooks.Open ("C:\Users\myname\Desktop\1.csv") 
Sheets("1").Select 
Application.Workbooks("1").Worksheets("1").Cells(1, 1).Select 
Range(Selection, Selection.End(xlToRight)).Select 
**Runtime Error 1004: Method 'Range' of object '_worksheet' failed** at above line 
Range(Selection, Selection.End(xlDown)).Select 

End Sub 

請參閱我上面使用的代碼。

任何幫助,非常感謝。我在這裏先向您的幫助表示感謝。

+2

'細胞(1,1).currentregion.select' –

回答

0

您可以使用CurrentRegion

Private Sub CommandButton3_Click() 
    Dim wb As WorkBook 
    Set wb = Workbooks.Open("C:\Users\myname\Desktop\1.csv") 
    wb.Sheets(1).Range("A1").Currentregion.Select 
End Sub 
相關問題