Sub saveweb()
'
' saveweb Macro
' Macro recorded 10/31/2004 by NORENJ
'
'
Dim strFname As String
strFname = InputBox("Enter Filename:")
ActiveWorkbook.PublishObjects.Add(xlSourceSheet, _
"C:\Documents and Settings\Drvortex\Desktop\" & strFname &
".html", "Jan04_Charts", "" _
, xlHtmlStatic, "2004_ChartsA_4129", "Jan04_Charts").Publish
(True)
End Sub
I identified strFname through the Inputbox...but I'm getting an error
when entered into the next class. How do I reference the strFname in
the following class?
--
drvortex
------------------------------------------------------------------------
drvortex's Profile:
http://www.excelforum.com/member.php...o&userid=15896
View this thread:
http://www.excelforum.com/showthread...hreadid=275047