Ошибка в скрипте vb для определения местоположения.xls

Question

Я столкнулся с проблемой при написании сценария vb для открытия файла.xls, который приведен ниже..

Dim XLAPP

Set XLAPP = createobject("excel.application")

XLAPP.Visible =true

XLAPP.Workbook.open"d:\book1.xls"

Когда я запускаю этот скрипт, всплывающее окно отображает ошибку, подобную этой:

Тест не может быть продолжен из-за неисправимой ошибки. 'd: \ book1.xls' не найден. Проверьте правильность написания имени файла и убедитесь, что местоположение файла указано правильно. Если вы пытаетесь открыть файл из списка последних использованных файлов, убедитесь, что файл не был переименован, перемещен или удален. Строка (1): "Тусклый XLAPP".

Когда я пишу сценарий XLAPP.Workbook.Add затем он добавляет файл Excel, но приведенный выше скрипт не открывает файл Excel.

Answer 1

Метод .Open находится в коллекции объектов Workbooks (множественное число), а не в объекте Workbook (единственное)¹.

XLAPP.Workbooks.open "d:\book1.xls"

FWIW, вы, возможно, использовали коллекцию Workbooks, не думая об этом в XLAPP.Workbooks.Add, Метод .Add не является членом единственного объекта Workbook, и я не смог заставить его работать; Run-time error 424: Object required,

¹ _{Престижность Matt Donnan и его комментарий выше для предоставления правильного ответа.}