使用 VBscript 或批处理脚本将 xlsx 文件转换为 HTML

Question

我已经研究了好几天，但找不到任何东西来解决我遇到的这个问题。

我有一个 .xlsx 格式的 Excel 文件，该文件全天更新。我需要做的就是调用一个将其转换为 .html 的批处理。我将获取该 HTML 文件并将其复制到一个文件夹中，该文件夹会自动发布该文件以供我公司内部使用。

如果有人可以提供帮助，我们将不胜感激。

Answer 1

Excel 允许您将本机另存为网页。它还有一个“单个文件”网页，将所有图像/等合并到一个文件中。它使用mhtormhtml扩展名。

Const xlHtml = 44
Const xlWebArchive = 45

' Create an instance of Excel and open the workbook...
Set objExcel = CreateObject("Excel.Application")
objExcel.Workbooks.Open "C:\Folder\MyWorkbook.xlsx"

' Save the workbook as an HTML or MHTML page...
objExcel.ActiveWorkbook.SaveAs "C:\Folder\MyPage.html",  xlHtml
' -or-
objExcel.ActiveWorkbook.SaveAs "C:\Folder\MyPage.mhtml", xlWebArchive

' Close Excel...
objExcel.Quit