如何使用VBAmacros在Excel中自动发布HTML图表？

我正在尝试使用VBA代码每分钟自动发布一个Excel图表。

Sub Auto_Open() ActiveWorkbook.PublishObjects.Add(xlSourceChart, _ "C:\Users\file\graph.html" _ , "Chart1", "", xlHtmlStatic, "DevXSample_16365", _ "Graph1").Publish (True) Application.OnTime Now + TimeValue("00:01:00"), _ "Auto_Open" End Sub 

我已经抓住这个代码在网站上，但是当我运行它时，Excel会显示这个错误信息：“应用程序定义或对象定义的错误”。 有人知道发生了什么吗？

Answer 1

.Publish是一个sub，而不是一个函数，所以你需要去掉True的括号。

Answer 2

我不确定没有看到您的电子表格，但如果“Chart1”是工作表，您将得到“应用程序定义或对象定义的错误”。 如果您的源是xlSourceChart ，那么Chart1必须是图表types（通过单击选项卡并select插入/图表创build）而不是工作表types。