Excelにテキストデータを取込んだあとでxls形式で保存するには？ (ID:108470)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 こんちは。 テキストファイルを開くとこまで出来ているなら Workbooksに開いているブック名（テキストファイル名）を指定しSaveAsメソッドで保存します。 SaveAsメソッドの引数に関してはExcelのヘルプを参照してください。 Set MyXL = CreateObject("Excel.Application") MyXL.Application.Workbooks.Open "c:\test.txt" MyXL.Application.Visible = True MyXL.Application.Workbooks("test.txt").SaveAs FileName:="C:\test.xls"