1. ホーム
  2. windows

[解決済み] コマンドラインでXLSからCSVに変換する

2022-09-20 20:18:11

質問

Windows のコマンドラインで XLS ファイルを CSV ファイルに変換するにはどうしたらよいでしょうか。

マシンにはMicrosoft Office 2000がインストールされています。Microsoft Office を使用して不可能であれば、OpenOffice をインストールすることに前向きです。

どのように解決するのですか?

メモ帳を開き、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があなたのいるマシンにインストールされている必要がありますが。