excel - 如何在 VBA 中调暗和设置变量工作簿名称？

Question

我有一个每周创建的具有变量名称结构的工作簿。名称结构如下:Week of Year & Invoice & date .所以一个示例文件可能被称为 1_Invoice_01052018.xlsm
我必须每周更新报告。我想将变量工作簿名称声明为 VBA 中的变量。我有另一个工作簿，其中包含通过 VBA 创建的报告的输出。在另一个工作簿中，我希望能够调用 Invoice电子表格，但由于它有一个变量名，我很难找到它。所以我把下面的VBA放在一起。

Sub Test()

Dim wb As Workbook
Dim ws As Worksheet

Set wb = "*Invoice*" & ".xlsm"
Set ws = Sheets("Sheet1")

wb.Activate
ws.Select

End Sub

但是，这会导致“类型不匹配”错误。

我还尝试了以下方法:

Sub Test2()

Windows("*Invoice*" & ".xlsm").Activate

End Sub

这也导致了错误。

关于如何在 VBA 中将变量工作簿名称设置为变量的任何想法？我一次只会打开其中一个工作簿，所以我不会遇到任何问题

Answer 1

您必须正确设置工作簿:

Sub Test()

  Dim wb As Workbook
  Dim ws As Worksheet
 
  Dim FilePath As String
  FilePath = "C:\" & AnotherVariable & ".xlsx"

  Set wb = Workbooks(FilePath)
  Set ws = Sheets("Sheet1")

  wb.Activate
  ws.Select

End Sub