Solved: SaveAs Macro Code

[lucas]

Here's a start...I used the macro recorder to get this:
[VBA]Sub Macro1()
ChDir "C:\Documents and Settings\main\Desktop\temp"
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Dan&Stacy\Desktop\temp\Book1.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub[/VBA]