Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
SaveAs - modify code?
Hi everyone. What I'm trying to accomplish is to have the user click
a button and have the SaveAs box come up with a default folder location. The code below does that fine. But, the file is always saved as the default name (Book1), even if I change it to something else. Can you please modify the code so I can choose he the file name to be saved as? Thanks!! sStr = "L:\Sales\East\Terms\2008\" ChDrive sStr ChDir sStr Application.GetSaveAsFilename ActiveWorkbook.SaveAs |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
SaveAs - modify code?
sStr = "L:\Sales\East\Terms\2008\"
ChDrive sStr ChDir sStr FName = Application.GetSaveAsFilename if FName = False then ActiveWorkbook.SaveAs else ActiveWorkbook.SaveAs filename:=FName end if "Steve" wrote: Hi everyone. What I'm trying to accomplish is to have the user click a button and have the SaveAs box come up with a default folder location. The code below does that fine. But, the file is always saved as the default name (Book1), even if I change it to something else. Can you please modify the code so I can choose he the file name to be saved as? Thanks!! sStr = "L:\Sales\East\Terms\2008\" ChDrive sStr ChDir sStr Application.GetSaveAsFilename ActiveWorkbook.SaveAs |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Modify existing code to dynamic code | Excel Programming | |||
almost there ... code modify help | Excel Programming | |||
SaveAs Code | Excel Programming | |||
Modify code in UDF | Excel Programming | |||
Help me modify this VBA code please: | Excel Programming |