如何使用vbscript将.tsv文件转换为xlsx文件？

Question

我需要将.tsv文件转换为.xlsx格式。有没有办法使用vbscript做到这一点？我试图在网上找到那个，但是找不到我真正需要的东西。我是VBScript的新手。如果有人可以帮助我，那就太好了。预先谢谢你。

Answer 1

以最简单的形式可以使用。 DisplayAlerts取消保存提示，仅当您希望看到它时才需要Visible。这将创建自己的Excel实例，因此不应干扰当前打开的任何Excel实例。

Option Explicit

Dim objExcel : set objExcel = CreateObject("Excel.Application")
objExcel.Application.DisplayAlerts = false
objExcel.Visible = true
objExcel.Workbooks.OpenText "c:\users\TEST\desktop\tab_delimited.tsv" ,,,1,,,,,,,True,"|"
objExcel.ActiveWorkbook.SaveAs "c:\users\TEST\desktop\tab_delimited.xlsx", 51
objExcel.ActiveWorkbook.Close
set objExcel = Nothing