Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
SaveAs Code
What is the correct code to save the current workbook (Book1.xls) as
(Book1A.xls) Thanks for the help. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
SaveAs Code
Hi Ronbo,
Try this: ' Get the filename with path sName = ThisWorkbook.FullName ' Add an 'A' to the end of the filename sName = Left(sName, Len(sName) - 4) & "A.xls" 'Save under new name ThisWorkbook.SaveAs sName Hoop This Helps, Executor |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
SaveAs Code
Thanks. Exactly what I was looking for.
"Executor" wrote: Hi Ronbo, Try this: ' Get the filename with path sName = ThisWorkbook.FullName ' Add an 'A' to the end of the filename sName = Left(sName, Len(sName) - 4) & "A.xls" 'Save under new name ThisWorkbook.SaveAs sName Hoop This Helps, Executor |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
SAveAs executes combobox code | Excel Programming | |||
More help with SaveAs | Excel Programming | |||
Help with SaveAs | Excel Programming | |||
SaveAs | Excel Programming | |||
URGENT - Need date format for SaveAs code | Excel Programming |