I have the following code that is used to prompt a user to save the current
file:

fname = Application.GetSaveAsFilename(FileFilter:="Microso ft Excel Workbook
(*.xls), *.xls")

However, when the save menu pops up, it has the current name of the file in
the filename slot as a default. I want it to be blank tho, to force the user
to type in name. Does someone know how I can modify the above to do that?

Paige:

If you try the help pages you can get a lot of information aboput the
functions.

For example the GetSaveAsFilename from the help page states:

Displays the standard Save As dialog box and gets a file name from the user
without actually saving any files.

expression.GetSaveAsFilename(InitialFilename, FileFilter, FilterIndex,
Title, ButtonText)

expression Required. An expression that returns an Application object.

InitialFilename Optional Variant. Specifies the suggested file name. If
this argument is omitted, Microsoft Excel uses the active workbook's name.

FileFilter Optional Variant. A string specifying file filtering criteria.

This string consists of pairs of file filter strings followed by the MS-DOS
wildcard file filter specification, with each part and each pair separated by
commas. Each separate pair is listed in the Files of type drop-down list box.
For example, the following string specifies two file filters, text and addin:
"Text Files (*.txt), *.txt, Add-In Files (*.xla), *.xla".

To use multiple MS-DOS wildcard expressions for a single file filter type,
separate the wildcard expressions with semicolons; for example, "Visual Basic
Files (*.bas; *.txt),*.bas;*.txt".

If omitted, this argument defaults to "All Files (*.*),*.*".

FilterIndex Optional Variant. Specifies the index number of the default
file filtering criteria, from 1 to the number of filters specified in
FileFilter. If this argument is omitted or greater than the number of filters
present, the first file filter is used.

Title Optional Variant. Specifies the title of the dialog box. If this
argument is omitted, the default title is used.

ButtonText Optional Variant. Macintosh only.

And you can instantly see that you need to use:

InitialFilename as in:

fname = Application.GetSaveAsFilename( _
InitialFilename:="", _
FileFilter:="Microsoft Excel Workbook (*.xls), *.xls")

--
Hope this helps
Martin Fishlock, Bangkok, Thailand
Please do not forget to rate this reply.


"Paige" wrote:

I have the following code that is used to prompt a user to save the current
file:

fname = Application.GetSaveAsFilename(FileFilter:="Microso ft Excel Workbook
(*.xls), *.xls")

However, when the save menu pops up, it has the current name of the file in
the filename slot as a default. I want it to be blank tho, to force the user
to type in name. Does someone know how I can modify the above to do that?

DUH!!!! Thanks, Martin. I didn't have the Help feature installed; so
installed it, and guess what - it has a wealth of info. Appreciate your
sending me down the path of enlightenment!

"Martin Fishlock" wrote:

Paige:

If you try the help pages you can get a lot of information aboput the
functions.

For example the GetSaveAsFilename from the help page states:

Displays the standard Save As dialog box and gets a file name from the user
without actually saving any files.

expression.GetSaveAsFilename(InitialFilename, FileFilter, FilterIndex,
Title, ButtonText)

expression Required. An expression that returns an Application object.

InitialFilename Optional Variant. Specifies the suggested file name. If
this argument is omitted, Microsoft Excel uses the active workbook's name.

FileFilter Optional Variant. A string specifying file filtering criteria.

This string consists of pairs of file filter strings followed by the MS-DOS
wildcard file filter specification, with each part and each pair separated by
commas. Each separate pair is listed in the Files of type drop-down list box.
For example, the following string specifies two file filters, text and addin:
"Text Files (*.txt), *.txt, Add-In Files (*.xla), *.xla".

To use multiple MS-DOS wildcard expressions for a single file filter type,
separate the wildcard expressions with semicolons; for example, "Visual Basic
Files (*.bas; *.txt),*.bas;*.txt".

If omitted, this argument defaults to "All Files (*.*),*.*".

FilterIndex Optional Variant. Specifies the index number of the default
file filtering criteria, from 1 to the number of filters specified in
FileFilter. If this argument is omitted or greater than the number of filters
present, the first file filter is used.

Title Optional Variant. Specifies the title of the dialog box. If this
argument is omitted, the default title is used.

ButtonText Optional Variant. Macintosh only.

And you can instantly see that you need to use:

InitialFilename as in:

fname = Application.GetSaveAsFilename( _
InitialFilename:="", _
FileFilter:="Microsoft Excel Workbook (*.xls), *.xls")

--
Hope this helps
Martin Fishlock, Bangkok, Thailand
Please do not forget to rate this reply.


"Paige" wrote:

I have the following code that is used to prompt a user to save the current
file:

fname = Application.GetSaveAsFilename(FileFilter:="Microso ft Excel Workbook
(*.xls), *.xls")

However, when the save menu pops up, it has the current name of the file in
the filename slot as a default. I want it to be blank tho, to force the user
to type in name. Does someone know how I can modify the above to do that?

Your are welcome.
--
Hope this helps
Martin Fishlock, Bangkok, Thailand
Please do not forget to rate this reply.


"Paige" wrote:

DUH!!!! Thanks, Martin. I didn't have the Help feature installed; so
installed it, and guess what - it has a wealth of info. Appreciate your
sending me down the path of enlightenment!

"Martin Fishlock" wrote:

Paige:

If you try the help pages you can get a lot of information aboput the
functions.

For example the GetSaveAsFilename from the help page states:

Displays the standard Save As dialog box and gets a file name from the user
without actually saving any files.

expression.GetSaveAsFilename(InitialFilename, FileFilter, FilterIndex,
Title, ButtonText)

expression Required. An expression that returns an Application object.

InitialFilename Optional Variant. Specifies the suggested file name. If
this argument is omitted, Microsoft Excel uses the active workbook's name.

FileFilter Optional Variant. A string specifying file filtering criteria.

This string consists of pairs of file filter strings followed by the MS-DOS
wildcard file filter specification, with each part and each pair separated by
commas. Each separate pair is listed in the Files of type drop-down list box.
For example, the following string specifies two file filters, text and addin:
"Text Files (*.txt), *.txt, Add-In Files (*.xla), *.xla".

To use multiple MS-DOS wildcard expressions for a single file filter type,
separate the wildcard expressions with semicolons; for example, "Visual Basic
Files (*.bas; *.txt),*.bas;*.txt".

If omitted, this argument defaults to "All Files (*.*),*.*".

FilterIndex Optional Variant. Specifies the index number of the default
file filtering criteria, from 1 to the number of filters specified in
FileFilter. If this argument is omitted or greater than the number of filters
present, the first file filter is used.

Title Optional Variant. Specifies the title of the dialog box. If this
argument is omitted, the default title is used.

ButtonText Optional Variant. Macintosh only.

And you can instantly see that you need to use:

InitialFilename as in:

fname = Application.GetSaveAsFilename( _
InitialFilename:="", _
FileFilter:="Microsoft Excel Workbook (*.xls), *.xls")

--
Hope this helps
Martin Fishlock, Bangkok, Thailand
Please do not forget to rate this reply.


"Paige" wrote:

I have the following code that is used to prompt a user to save the current
file:

fname = Application.GetSaveAsFilename(FileFilter:="Microso ft Excel Workbook
(*.xls), *.xls")

However, when the save menu pops up, it has the current name of the file in
the filename slot as a default. I want it to be blank tho, to force the user
to type in name. Does someone know how I can modify the above to do that?