将excel表保存为类似于另存为的html文件

Question

我有一个多表excel工作簿想要使用VBA将一个工作表保存为html文件。

当手动保存时应该像保存操作一样，因为excel中的格式显示在保存的HTML文件中，但是当尝试使用VBA或宏执行此操作时，文件已保存但格式丢失。

Application.Sheets("MNM Report").Activate
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:="D:\Reports\09192014\mnm.html"

帮助我解决如何执行此功能而不使用excel中的格式，换句话说我需要使用vba执行另存为选项。

Answer 1

尝试使用FileFormat方法的Workbook.SaveAs参数。 E.g。

ActiveWorkbook.SaveAs Filename:="D:\Reports\09192014\mnm.html" FileFormat:=xlHtml

您可以在MSDN的XlFileFormat Enumeration中看到FileFormat的更多选项。