如何用VBA代码将工作表导出(非另存)为网页格式？

楼主
kevinchengcw

Q: 如何用VBA代码将工作表导出为网页格式？
A: 可以用如下代码将活动工作表导出为网页，存为D:\Page.htm静态网页，代码如下：

With ActiveWorkbook.PublishObjects.Add（xlSourceSheet, "D:\Page.htm", "Sheet1", "", xlHtmlStatic, "Book1_18490", "")
.Publish (True)
.AutoRepublish = False
End With

ActiveWorkbook.PublishObjects.Add命令格式：
ActiveWorkbook.PublishObjects.Add(来源类型，导出的路径及网页文件名，要导出的工作表名，网页类型，标识符，标题）

应用于 PublishObjects 对象的 Add 方法。
创建一个对象，该对象代表保存在网页上的文档中的项目。当对 Microsoft Excel 中的文档进行了一些自动修订时，这些对象可帮助随后对网页进行的更新。
expression.Add(SourceType, Filename, Sheet, Source, HtmlType, DivID, Title)
必需。该表达式返回一个 PublishObjects 对象。
SourceType 类型，必需。源的类型。

XlSourceType 可为以下 XlSourceType 常量之一。表示源对象。

xlSourceAutoFilter 自动筛选区域。

xlSourceChart 图表。

xlSourcePivotTable 数据透视表。

xlSourcePrintArea 选定要打印的单元格区域。

xlSourceQuery 查询表（外部数据区域）。

xlSourceRange 单元格区域。

xlSourceSheet 整张工作表。

xlSourceWorkbook 工作簿。

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

猜您喜欢

评论列表

sitemap