Saving Sheets as Web Pages?

[ExcelCrazy]

IM Using OfficeXP, any way to Save out a bunch of sheets as individual web-pages instead of a Workbook.. I know you can do it manually which would take me ages, i have around 40 Sheets on my workbook.. that change all the time..

I need the pages to be viewed Separate from each other hence the workbook route is not an option..

Thanks

 

[DonkeyOte]

Sub Macro1()

With ActiveWorkbook.PublishObjects.Add(xlSourceSheet, "C:Luke WorkPage.htm", _
"Sheet1", "", xlHtmlStatic, "Book1_14402", "")
.Publish (True)
.AutoRepublish = False
End With
End Sub


_________________
LASW10
This message was edited by lasw10 on 2002-10-27 02:48