如何使用 vbscript 将 .tsv 文件转换为 xlsx 文件?
How can I covert .tsv file to xlsx file using vbscript?
我需要将 .tsv 文件转换为 .xlsx 格式。有没有办法使用 vbscript 来做到这一点?我试图在网上找到它,但找不到我真正需要的东西。我对 VBScript 很陌生。如果有人可以帮助我,那就太好了。提前谢谢你。
以最简单的形式,这将起作用。 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
我需要将 .tsv 文件转换为 .xlsx 格式。有没有办法使用 vbscript 来做到这一点?我试图在网上找到它,但找不到我真正需要的东西。我对 VBScript 很陌生。如果有人可以帮助我,那就太好了。提前谢谢你。
以最简单的形式,这将起作用。 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