讀取單元格並使用文本作為VBA公式的輸入

Question

我一直在尋找很長一段時間來為我的問題找到一個簡單的解決方案，但我找不到它。 我的問題是我想引用一個單元格並將其用作我的VBA代碼中的文本。

例如：說單元格= C104

VBA會做：

wb2.Sheets("Cell").Range("F8:F22").Copy
wb1.Sheets("asd").Range("B7:B21").PasteSpecial

這不起作用，因為它實際上並沒有使用單元格中的文本。 我嘗試過使用cell().Text和.value但它們不起作用。

Answer 1

您有多個工作簿和多個可用的工作表，可能是單元的父級。 您需要最終引用單元格，並將其.Value或.Text用作工作表名稱，而不依賴於Activesheet作為默認父級。

dim myWS as string
myWS = wb1.Sheets("asd").Range("C104").value  '◄ this gets the value of cell. I don't know if I have referenced the correct workbook and worksheet
wb2.Sheets(myWS).Range("F8:F22").Copy _
  destination:=wb1.Sheets("asd").Range("B7")