使用像元值作为范围VBA

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