Dim XL As New Excel.Application xls.Workbooks.Open FileName не работает - VB

Формулировка задачи:

Использую код:
Dim XL As New Excel.Application
xls.Workbooks.Open FileName
Не работает под Win98. Выдается ошибка 'automation error'. Пожалуйста, помогите справится с проблемой.

Код к задаче: «Dim XL As New Excel.Application xls.Workbooks.Open FileName не работает - VB»

textual
Dim XLS As Excel.Application
Set XLS = CreateObject('Excel.Application')
 
XLS.Workbooks.Open PathDan 'открыть документ
XLS.Visible = True 'показать его на экране
Set XLS = Nothing

7   голосов, оценка 4.429 из 5


СОХРАНИТЬ ССЫЛКУ