Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to save a workbook
I have the following code and it doesn't save as it is supposed to. Am I
missing something? I can't seem to figure it out. Thanks. Sub Upload() Application.EnableCancelKey = xlDisabled Sheets("Upload").Select lastRow = Range("M10000").End(xlUp).Row Range("M" & lastRow).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "END" Call Copy_GL Q = Range("n1") Call VoucherNum Range("a1:n1000").Select Selection.Copy Workbooks.Add ActiveSheet.Paste 'Application.Goto referenece:="gl_acct" 'ActiveCell.Offset(0, 1).Range("a1").Select 'ActiveCell.ClearContents Rows("1:1").Select Selection.Delete Shift:=xlUp spath = "P:\Platinum\A_P IMPORT\Contractor Invoices\" & Q ActiveWorkbook.SaveAs Filename:=[spath], _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False ActiveWindow.Close 'windows("xxxxxxx").activate Range("a3:m1000").ClearContents Call name_fields End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to save a workbook
you mustn't use square brackets for declare Filename, that is
ActiveWorkbook.SaveAs Filename:=spath, _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro save workbook | Excel Discussion (Misc queries) | |||
Do not save macro with workbook | Excel Programming | |||
Save workbook not macro | Excel Programming | |||
possible to save macro with workbook as add-in? | Excel Programming | |||
"Save" macro problem, still prompted to save when closing workbook (?) | Excel Programming |