Capturing 'Cancel' on Applicaiton.Dialogs(xlDialogOpen).Show FileP
On Sep 6, 10:36 am, Vergel Adriano
wrote:
Sub test()
Filename = Application.GetOpenFilename
If Filename = False Then
MsgBox "User Cancelled!"
End If
'or
If Application.Dialogs(xlDialogOpen).Show("Z:\TEMP\*. xls") = False Then
MsgBox "User Cancelled!"
End If
End Sub
--
Hope that helps.
Vergel Adriano
"theSquirrel" wrote:
Hello there,
I have read many instances of how to use the Open dialog on many
different sites and haven't found a way to capture the 'cancel' button
when there is a file already selected.
Here is the code that I am using:
FilePathAndName= Range("BY35").Value
Application.Dialogs(xlDialogOpen).Show FilePathAndName
I know that there is another way to get the open dialog box using the
following code:
FileName = Application.GetOpenFilename
Even this has problems handling the 'cancel' button when a file was
selected.
Can anyone help?
Vergel...
This is brilliant! it is exactly what I was looking for!!
If Application.Dialogs(xlDialogOpen).Show("Z:\TEMP\*. xls") = False
Then
MsgBox "User Cancelled!"
End If
|