vba - 在 vba 中使用变量选择 Excel 工作表

Question

我有以下 Excel VBA 代码。

我已经从另一个 Excel 文档中复制了一些数据。我需要将这些日期粘贴到包含每周 Excel 工作表的第二个文档中。

Excel 工作表称为“第 01 周”、“第 02 周”、“...”、“第 52 周”。

现在我需要选择具有正确编号的工作表将我复制的数据粘贴到那里。

Sub Macro1()

Dim number As String
Dim year As String

number = Application.InputBox(Prompt:="insert week number (01-52))", Type:=2)
year = Application.InputBox(Prompt:="insert year (YYYY)", Type:=2)

Workbooks.Open Filename:= _
"F:\documents\" & year & "\example " & number & ".xlsm"

Sheets("Week" number).Select

Range("M4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False

End Sub

我知道以下代码不正确。如何使用变量“数字”选择正确的 Excel 工作表？

Sheets("Week" number).Select

Answer 1

关于下面的代码，您是否错过了在两者之间添加“&”，或者您只是错过了输入它？

Sheets("Week" number).Select

应该

Sheets("Week " & number).Select 'there is a space after week??

请注意“”之间的空格。他们可以堆积你的代码。像下面的那个。 "\example"后面有一个空格:

"F:\documents\" & year & "\example " & number & ".xlsm"