Good point. ThisWorkBook should take care of that issue as you
amended.

Ken


On Oct 12, 3:44*pm, p45cal wrote:
Ken;523100 Wrote:

Jeff

Try

Sub Macro2()
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\" &
"Book2.xls"
End Sub

or something along that line.

Ken

There might be a problem with 'ActiveWorkbook.Path' ken.. the
activeworkbook hasn't got a path yet since it's never been saved!

--
p45cal

*p45cal*
------------------------------------------------------------------------
p45cal's Profile:http://www.thecodecage.com/forumz/member.php?userid=558
View this thread:http://www.thecodecage.com/forumz/sh...d.php?t=143554