使用像元值作為范圍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