Здравствуйте.
Известен полный путь к текстовому файлу.
Задачи 1)открыть текстовый файл с помощью workbooks.opentext, 2)обработать его, 3)при завершении обработки закрыть.
Есть несколько вариантов с использованием пользовательской функции, которая возвращала бы ссылку на открываемый текстовый файл:
I)Создать ссылку на объект workbooks.opentext (не работает)
Функция opentext по идее должна возвращать ссылку на объект workbook, но при попытке присвоить объект
Set NewBook = workbooks.opentext.....
Выдается ошибка на opentext.
II)Использовать просто имя файла. Но как грамотно из полного имени файла, выделить только его название(нужно для последующего закрытия)
III) Использовать следующий код:
Dim AppExcel As Excel.Application
Set AppExcel = New Excel.Application
AppExcel.Workbooks.OpenText ...
(У меня данный код не работает как нужно: файл не отображается)
Рад буду узать ваши соображения на этот счет.
Известен полный путь к текстовому файлу.
Задачи 1)открыть текстовый файл с помощью workbooks.opentext, 2)обработать его, 3)при завершении обработки закрыть.
Есть несколько вариантов с использованием пользовательской функции, которая возвращала бы ссылку на открываемый текстовый файл:
I)Создать ссылку на объект workbooks.opentext (не работает)
Функция opentext по идее должна возвращать ссылку на объект workbook, но при попытке присвоить объект
Set NewBook = workbooks.opentext.....
Выдается ошибка на opentext.
II)Использовать просто имя файла. Но как грамотно из полного имени файла, выделить только его название(нужно для последующего закрытия)
III) Использовать следующий код:
Dim AppExcel As Excel.Application
Set AppExcel = New Excel.Application
AppExcel.Workbooks.OpenText ...
(У меня данный код не работает как нужно: файл не отображается)
Рад буду узать ваши соображения на этот счет.