使用variables来selectvba中的Excel表格

我有以下Excel VBA代码。

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

Excel工作表被称为“第01周”，“第02周”，“…”，“第52周”。

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

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 

我知道下面的代码是不正确的。 如何使用variables“数字”select正确的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"