如何使用VBA中的内联CSS将Excel导出为HTML？

我有以下的VBA输出到HTML，但它把<style>标签分开。 我想导出到内嵌样式的HTML，适合电子邮件。

 With TempWB.PublishObjects.Add( _ SourceType:=xlSourceRange, _ FileName:=TempFile, _ Sheet:=TempWB.Sheets(1).Name, _ Source:=TempWB.Sheets(1).UsedRange.Address, _ HtmlType:=xlHtmlStatic) .Publish (True) End With 

我看不到这个函数的内联CSS选项： http : //msdn.microsoft.com/en-us/library/office/ff823068.aspx

我发现这个在线工具手动执行： http : //beaker.mailchimp.com/inline-css

这个类似的问题不是VBA相关的： 如何使用INLINE CSS将Excel电子表格导出到HTML表格？