Mega Code Archive

 
Categories / VisualBasic Script / Excel
 

Saving Worksheets as Web Pages

Sub webPage() ActiveWorkbook.SaveAs _      Filename:=ActiveWorkbook.Path & "\myXclfile.htm", _      FileFormat:=xlHtml End Sub