Question

通过激活一个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

请参阅我上面使用的代码。

非常感谢任何帮助。感谢您的帮助。

Answer 1

您可以使用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

在另一个工作表中选择动态范围

1 个答案: