Sub Macro1()
'
' Macro1 Macro
' Macro recorded 9/02/2006 by rulebr
'
'
With ActiveWorkbook.PublishObjects("Brady Standard Quote 7.2.06_23158")
.HtmlType = xlHtmlStatic
.Publish (False)
End With
End Sub
Ive recorded the following macro to save my worksheet as a html page.
Ive created a button and that works fine.
Is there a way I can get tricky with the name of the file it creates.
Basically I would like the file name to contain a number that increments
every time the macro is pressed.
Id also like it to contain the date, and the company name which is from cell
in the spreadsheet.
eg.
QuoteNo_1000_Company Name(Cell D10)_09022006.xls
QuoteNo_1001_Company Name(Cell D10)_09022006.xls
I guess i need to store the incrementing number somewhere in a worksheet of
its own so it knows the number to call.
Any help with the macro appreciated.
Bookmarks