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

Question

我有以下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无关：How to export Excel spreadsheet to HTML table with INLINE CSS?