Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > MS Windows > Конвертирование из txt в Exel с помощью командной

Автор: Antila 25.1.2010, 09:45

Есть текстовые файлы *.txt (см. test.txt), необходимо их сохранить в формате электронный таблиц (excel) с помощью командной строки.
Подскажите пожалуйста, как это можно сделать? Может конвертер какой-нибудь скачать и уже к нему с помощью командной строки обращаться...

Добавлено @ 09:46
Пример текстового файла

Автор: Akina 25.1.2010, 09:47

C помощью командной строки это будет затруднительно. А вот написАть VBS-скрипт, который это выполнит, вполне возможно. Конечно, Excel на компе должен быть установлен.

Автор: Antila 25.1.2010, 10:30

Цитата(Akina @ 25.1.2010, 09:47)

Подскажите, где можно почитать про написание VBS скрипта для работы с Excel, открытие текстовых файлов в Excel.

Это пока единственное что удалось откопать:
Здесь просто открывается текстовый файл в Excel, не учитывая разделители - это плохо
И в конце работы скрипта почему то Excel не закорывается и чего-то ждет

Код


'*******************************************************************
' Имя: tt.vbs
' Язык: VBScript
' Описание: Использование из сценария внешнего объекта
'           автоматизации (Microsoft Excel)
'*******************************************************************
Option Explicit
                             
Dim XL  ' Объявляем переменные
Dim wk  ' Объявляем переменные

'Создаем объект-приложение Microsoft Word    
Set XL=WScript.CreateObject("Excel.Application")

Set wk= XL.WorkBooks.open("D:\S\vbs\test.txt")

'Делаем окно Microsoft Excel видимым
XL.Visible=true

wk.activate

'Сохранение книги
wk.ActiveWorkbook.SaveAs("D:\S\vbs\book.xls")

'Завершить работу приложения
XL.Quit

'*************  Конец *********************************************