Hi.
I think you can try something like this:
def var chPublishObjects as handle.
chPublishObjects = vchWorkBook:PublishObjects:ADD(xlSourceChart,"C:\web1.htm","Sheet1","Chart1",xlHtmlStatic,"xx","").
chPublishObjects:Publish = True.
or
chPublishObjects:Publish.