excel - 定义工作簿名称时，VBA类型不匹配

Question

我有以下代码，该代码首先定义文件路径，然后最终将打开工作簿并将特定的工作表打印为pdf。
但是，尝试设置工作簿变量“wb”时出现类型不匹配错误。它突出显示和，并且不会运行。
我将变量设置错误吗？

Dim wb As Workbook, ws As Worksheet
Dim FILE_PATH As String
Dim FILE_NAME As String
Dim loc As Worksheet


FILE_PATH = "Users\auser\Documents\Test"
FILE_NAME = "Email_Print_Test"
Set wb = "C:\" & FILE_PATH & "\" & FILE_NAME & ".xlsb"
Set ws = wb.Worksheets("New_Sheet")

loc = wb.ws

Answer 1

您正在尝试将String分配给Workbook对象。
您需要使用Workbooks.Open打开工作簿。此方法返回Workbook对象。

Sub demo()
    Dim wb As Workbook, ws As Worksheet
    Dim FILE_PATH As String
    Dim FILE_NAME As String
    Dim loc As Worksheet
    
    
    FILE_PATH = "Users\auser\Documents\Test"
    FILE_NAME = "Email_Print_Test"

    ' Use method here
    Set wb = Workbooks.Open("C:\" & FILE_PATH & "\" & FILE_NAME & ".xlsb")
    Set ws = wb.Worksheets("New_Sheet")
    
    loc = wb.ws
End Sub