Currently I am using this macro:

Sub PublishList()
'
' PublishList Macro
' Publish
'
' Keyboard Shortcut: Ctrl+Shift+P
'
Range("A1:B10").Select
Range("B10").Activate
With ActiveWorkbook.PublishObjects("warehouse-list_7983")
.HtmlType = xlHtmlStatic
.Filename = _
"C:\testing\testout.html"
.Publish (False)
.AutoRepublish = False
End With
End Sub



But I would like to add additional HTML before and after the xls data that is exported. I would like to create my own <head> tags for example.

How can I do this?