ошибка времени выполнения '91' переменная объекта vba или переменная with-block не установлена

Question

Добрый день,

Я получаю ошибки следующим образом:

ошибка времени выполнения '91' Переменная объекта VBA или переменная без блока не установлена ​​

мой код выглядит следующим образом:

Sub Test2()

    Dim newWorkBook As Workbook

    newWorkBook = GetExcelFile("C:\", "truck.xlsx")
    Debug.Print newWorkBook

End Sub

Function GetExcelFile(path As String, filename As String) As Workbook

    Dim newWorkBook As Workbook

    Set newWorkBook = Workbooks.Add
    newWorkBook.SaveAs path & "\" & filename
    Debug.Print newWorkBook.name & " " & newWorkBook.FullName


    newWorkBook.Close False
    GetExcelFile = newWorkBook

End Function