Option to overwrite with VBA initiated open/Save Common Dialog
 

The way I read your post is that you do want to see the overwrite
message, correct? If so, simply remove the DisplayAlerts lines from
Chip's code.
Sub AAA()
Dim FName As Variant
FName = Application.GetSaveAsFilename( _
filefilter:="Excel Files (*.xls), *.xls")
If FName = False Then
' user cancelled
Exit Sub
End If
On Error Resume Next
ThisWorkbook.SaveAs Filename:=FName
End Sub

BAC wrote:
XP, MSO 2003
I have an Excel routine that executes a call to the comon dialog open/save
file as per http://www.mvps.org/access/api/index.html Call Windows File
Open/Save Dialog box.

The only issue i have is, when saving, there is no option to overwrite.
(i.e. "The file filename.xls already exists, do you want to overwrite it?"
type-thing)

Is it possible to do that within the call to the dialog box, or does that
have to be coded as a separate search for the file and, if it's found use a
message box to ask, then call the dialog box.

I was told using DisplayAlert before the call would work but it doesn't.

TIA

BAC

Option to overwrite with VBA initiated open/Save Common Dialog
 

The way I read your post is that you do want to see the overwrite
message, correct? If so, simply remove the DisplayAlerts lines from

I think you're right. I misread the post and thought he wanted to suppress
the overwrite? message.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel, 10 Years
Pearson Software Consulting
www.cpearson.com
(email on the web site)


"JW" wrote in message
ps.com...
The way I read your post is that you do want to see the overwrite
message, correct? If so, simply remove the DisplayAlerts lines from
Chip's code.
Sub AAA()
Dim FName As Variant
FName = Application.GetSaveAsFilename( _
filefilter:="Excel Files (*.xls), *.xls")
If FName = False Then
' user cancelled
Exit Sub
End If
On Error Resume Next
ThisWorkbook.SaveAs Filename:=FName
End Sub

BAC wrote:
XP, MSO 2003
I have an Excel routine that executes a call to the comon dialog
open/save
file as per http://www.mvps.org/access/api/index.html Call Windows File
Open/Save Dialog box.

The only issue i have is, when saving, there is no option to overwrite.
(i.e. "The file filename.xls already exists, do you want to overwrite
it?"
type-thing)

Is it possible to do that within the call to the dialog box, or does that
have to be coded as a separate search for the file and, if it's found use
a
message box to ask, then call the dialog box.

I was told using DisplayAlert before the call would work but it doesn't.

TIA

BAC