Question

我试图从一个单元格中拾取一个范围（称之为“A5：L10”）。换句话说，我的代码看起来类似于下面的代码：

  Dim summ_rng1 As String
  summ_rng1 = Sheet11.Cells(17, 3).Value

  Workbooks(wb).Sheets(summ).Range(summ_rng1).......

summ_rng1 =“A5：L10”

我在代码中对工作簿和工作表做了同样的事情并且工作正常，但是当我尝试用变量summ_rng1替换范围引用时它不起作用。

有关如何使用范围值作为变量运行代码的任何想法，如上所述？谢谢您的帮助！

Answer 1

您的代码对我有用。我认为它与您的wb对象有关，它可能包含工作簿本身，而不是工作簿的名称。试试这个：

Sub testSub()
Dim myRange As String
Dim wb As Workbook
Set wb = ThisWorkbook

myRange = wb.Sheets(1).Cells(1, 1)

wb.Sheets(1).Range(myRange).Select
End Sub

使用单元格值作为范围VBA

1 个答案: