Try something like

Sub AAA()
ActiveWorkbook.Save
Workbooks.Open Filename:="C:\whatever.xls"
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"tamato43" wrote in message
...
Is there a way to Create a macro to save current file and then
Open a new
file, by specifying one for sure.