Преобразуйте XLS в CSV на командной строке

Как уже говорилось много раз - с div ~ p выбраны все элементы

, которым предшествует элемент

.

Проверьте этот список все селектор CSS.

96
задан Joel 7 December 2009 в 06:24
поделиться

5 ответов

Откройте Блокнот, создайте файл с именем XlsToCsv.vbs и вставьте его в:

if WScript.Arguments.Count < 2 Then
    WScript.Echo "Error! Please specify the source path and the destination. Usage: XlsToCsv SourcePath.xls Destination.csv"
    Wscript.Quit
End If
Dim oExcel
Set oExcel = CreateObject("Excel.Application")
Dim oBook
Set oBook = oExcel.Workbooks.Open(Wscript.Arguments.Item(0))
oBook.SaveAs WScript.Arguments.Item(1), 6
oBook.Close False
oExcel.Quit
WScript.Echo "Done"

Затем из в командной строке перейдите в папку, в которой вы сохранили файл .vbs, и запустите:

XlsToCsv.vbs [sourcexlsFile].xls [destinationcsvfile].csv

Для этого требуется, чтобы Excel был установлен на вашем компьютере.

116
ответ дан 24 November 2019 в 05:33
поделиться

:: Поскольку UTF-8 работает на Microsoft Office 2016 и выше!

Попытка этот код:

if WScript.Arguments.Count < 2 Then
    WScript.Echo "Please specify the source and the destination files. Usage: ExcelToCsv <xls/xlsx source file> <csv destination file>"
    Wscript.Quit
End If

csv_format = 62

Set objFSO = CreateObject("Scripting.FileSystemObject")

src_file = objFSO.GetAbsolutePathName(Wscript.Arguments.Item(0))
dest_file = objFSO.GetAbsolutePathName(WScript.Arguments.Item(1))


Dim oExcel
Set oExcel = CreateObject("Excel.Application")

Dim oBook
Set oBook = oExcel.Workbooks.Open(src_file)

oBook.SaveAs dest_file, csv_format

oBook.Close False
oExcel.Quit
0
ответ дан 24 November 2019 в 05:33
поделиться

В Windows встроен поставщик данных Excel OLEDB; вы можете использовать это, чтобы «запросить» лист Excel через ADO.NET и записать результаты в файл CSV. Требуется небольшой объем кода, но вам не нужно ничего устанавливать на машину.

1
ответ дан 24 November 2019 в 05:33
поделиться

Как насчет PowerShell?

Код должен выглядеть так, хотя не тестировался

$xlCSV = 6
$Excel = New-Object -Com Excel.Application 
$Excel.visible = $False 
$Excel.displayalerts=$False 
$WorkBook = $Excel.Workbooks.Open("YOUDOC.XLS") 
$Workbook.SaveAs("YOURDOC.csv",$xlCSV) 
$Excel.quit()

Вот сообщение, объясняющее, как его использовать

Как я могу использовать Windows PowerShell для Автоматизировать Microsoft Excel?

17
ответ дан 24 November 2019 в 05:33
поделиться

Почему бы не написать свой собственный?

Я вижу из вашего профиля, что у вас есть хотя бы некоторый опыт работы с C # /. NET. Я бы создал консольное приложение Windows и использовал бы бесплатную программу чтения Excel для чтения ваших файлов Excel. Я использовал Excel Data Reader , доступный на CodePlex, без каких-либо проблем (одна приятная вещь: для этого ридера не требуется установка Excel). Вы можете вызвать консольное приложение из командной строки.

Если вы застряли, напишите здесь, и я уверен, вы получите помощь.

5
ответ дан 24 November 2019 в 05:33
поделиться
Другие вопросы по тегам:

Похожие вопросы: