Create Save As with user prompt in macro

CRF · Mar 27th, 2002, 05:03 PM

I want to create a macro that will "save as" a new file, and prompt the user for the new file name. How do I do this?

Tom Urtis · Mar 27th, 2002, 05:14 PM

It sounds like all you need is something like this line of code in your macro:

Application.Dialogs(xlDialogSaveAs).Show

Any help or is it something more that you need?

BabyTiger · Mar 27th, 2002, 05:21 PM

Hi,

You might want to try the following 2 lines of codes:

iFileName = Application.GetSaveAsFilename
ActiveWorkbook.SaveAs iFileName

First line is the prompt for the filename, ie. user will choose the directory, and type in what filename they want to save the workbook as. And then second line is the actual saving process.

HTH

PS. Tom got in before me. Sorry Tom.

[ This Message was edited by: BabyTiger on 2002-03-27 12:23 ]

CRF · Mar 27th, 2002, 06:32 PM

Thanks - that's what I needed. One other question - I have a series of macros within my workbook that I need to export to another workbook owned by someone self. How do I do this?

Mark O'Brien · Mar 27th, 2002, 07:07 PM

Quote:

On 2002-03-27 13:32, CRF wrote:
Thanks - that's what I needed. One other question - I have a series of macros within my workbook that I need to export to another workbook owned by someone self. How do I do this?

Start a new thread with this one and you've got more chance of an answer. What exactly are you looking for? Just to transfer to one workbook? Try to state exactly what you want as well.

Mar 27th, 2002, 05:14 PM	#2
Tom Urtis MrExcel MVP Join Date: Feb 2002 Location: San Francisco, California USA Posts: 9,322	It sounds like all you need is something like this line of code in your macro: Application.Dialogs(xlDialogSaveAs).Show Any help or is it something more that you need? __________________ Tom Urtis

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 27th, 2002, 05:03 PM	#1
CRF Join Date: Mar 2002 Posts: 25	I want to create a macro that will "save as" a new file, and prompt the user for the new file name. How do I do this?

Mar 27th, 2002, 05:21 PM	#3
BabyTiger Join Date: Mar 2002 Location: Wellington Posts: 104	Hi, You might want to try the following 2 lines of codes: iFileName = Application.GetSaveAsFilename ActiveWorkbook.SaveAs iFileName First line is the prompt for the filename, ie. user will choose the directory, and type in what filename they want to save the workbook as. And then second line is the actual saving process. HTH PS. Tom got in before me. Sorry Tom. [ This Message was edited by: BabyTiger on 2002-03-27 12:23 ]

Mar 27th, 2002, 06:32 PM	#4
CRF Join Date: Mar 2002 Posts: 25	Thanks - that's what I needed. One other question - I have a series of macros within my workbook that I need to export to another workbook owned by someone self. How do I do this?