Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
I am trying to create a button that will pick a value from a specified cell
and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
Bill,
Use code like the following: Dim FName As Variant FName = Application.GetSaveAsFilename( _ InitialFileName:="MyFile.xls", _ filefilter:="Excel Files (*.xls),*.xls") If FName = False Then ' user cancelled Else ' user selected FName End If -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
sStr = Thisworkbook.Path & "\" & activecell.value & ".xls"
fname = application.GetSaveAsFileName( InitialFileName:=sStr) -- Regards, Tom Ogilvy "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
To get the save as dialog use
Application.Dialogs(xlDialogSaveAs).Show fname HTH "Tom Ogilvy" wrote: sStr = Thisworkbook.Path & "\" & activecell.value & ".xls" fname = application.GetSaveAsFileName( InitialFileName:=sStr) -- Regards, Tom Ogilvy "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
Sorry I accidentally hit post too fast. Tom. What is the difference between
Application.Dialogs(xlDialogSaveAs).Show sStr and fname = application.GetSaveAsFileName( InitialFileName:=sStr) ? "Jim Thomlinson" wrote: To get the save as dialog use Application.Dialogs(xlDialogSaveAs).Show fname HTH "Tom Ogilvy" wrote: sStr = Thisworkbook.Path & "\" & activecell.value & ".xls" fname = application.GetSaveAsFileName( InitialFileName:=sStr) -- Regards, Tom Ogilvy "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
Jim,
GetSaveAsFileName simply returns a filename (or False if the user cancels the dialog). It doesn't actually do the save. Displaying the xlDialogSaveAs will carry out the save operation. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Jim Thomlinson" wrote in message ... Sorry I accidentally hit post too fast. Tom. What is the difference between Application.Dialogs(xlDialogSaveAs).Show sStr and fname = application.GetSaveAsFileName( InitialFileName:=sStr) ? "Jim Thomlinson" wrote: To get the save as dialog use Application.Dialogs(xlDialogSaveAs).Show fname HTH "Tom Ogilvy" wrote: sStr = Thisworkbook.Path & "\" & activecell.value & ".xls" fname = application.GetSaveAsFileName( InitialFileName:=sStr) -- Regards, Tom Ogilvy "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need VBA code for Save As dialog
Thanks... That was quicker than looking it up... :-)
"Chip Pearson" wrote: Jim, GetSaveAsFileName simply returns a filename (or False if the user cancels the dialog). It doesn't actually do the save. Displaying the xlDialogSaveAs will carry out the save operation. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Jim Thomlinson" wrote in message ... Sorry I accidentally hit post too fast. Tom. What is the difference between Application.Dialogs(xlDialogSaveAs).Show sStr and fname = application.GetSaveAsFileName( InitialFileName:=sStr) ? "Jim Thomlinson" wrote: To get the save as dialog use Application.Dialogs(xlDialogSaveAs).Show fname HTH "Tom Ogilvy" wrote: sStr = Thisworkbook.Path & "\" & activecell.value & ".xls" fname = application.GetSaveAsFileName( InitialFileName:=sStr) -- Regards, Tom Ogilvy "Bill Sturdevant" wrote in message ... I am trying to create a button that will pick a value from a specified cell and put up a Save As dialog pre-filled with the name of the file as Value-I-Picked.xls and the suggested path as the path of the workbook I originally opened. Where can I find suggestions for appropriate code? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Save as dialog | Excel Discussion (Misc queries) | |||
how to get disk icon on save button of save as dialog like 2000 | Excel Discussion (Misc queries) | |||
VBA code to show a save as dialog does not work | Excel Programming | |||
Changing Save As Type in Save as dialog box | Excel Programming | |||
Save As Dialog | Excel Programming |