non-interactive (programmatic) download & save of Excel mht as an xls file

[sthati]

We have a reporting tool that produces excel output as an mht file that
can be opened in IE. Is there a way to programmatically convert the
file to an xls format, without going throught he open -> save process
from within IE?

Thanks!

 

[Jezebel]

Dim pWorkBook as Excel.Workbook

Set pWorkbook = Workbooks.Open(FileName:=....)
pWorkbook.SaveAs FileName:=...., FileFormat:=xlNormal