ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Exit Sub when File Open Dialogbox is cancelled (https://www.excelbanter.com/excel-programming/432807-exit-sub-when-file-open-dialogbox-cancelled.html)

AG[_3_]

Exit Sub when File Open Dialogbox is cancelled
 
Hi,

This should be fairly simple for a lot of you but I am struggling with
it. I have a macro that opens up a dialog box to allow users open the
input data file to be processed using macro. Many a times users click
cancel instead of opening the file and in that case I get a run time
error.

What is want is when the users cancel it should just give them a
message and macro should end while if they opened the input file then
the rest of the macro should run.
Can someone help me with this? Thanks.

- AG

Gary''s Student

Exit Sub when File Open Dialogbox is cancelled
 
How about:

Sub dural()
Filename = Application.GetOpenFilename()
If Filename = False Then
Exit Sub
End If
MsgBox (Filename)
End Sub

--
Gary''s Student - gsnu200901


"AG" wrote:

Hi,

This should be fairly simple for a lot of you but I am struggling with
it. I have a macro that opens up a dialog box to allow users open the
input data file to be processed using macro. Many a times users click
cancel instead of opening the file and in that case I get a run time
error.

What is want is when the users cancel it should just give them a
message and macro should end while if they opened the input file then
the rest of the macro should run.
Can someone help me with this? Thanks.

- AG


AG[_3_]

Exit Sub when File Open Dialogbox is cancelled
 
Hi,
thanks for your help on this. The first part is working fine now,that
is, if the user cancels then it stops but I had added the else part in
there which does not execute at all. Not sure what is the reason.

AG[_3_]

Exit Sub when File Open Dialogbox is cancelled
 
Got the issue resolved. Actually I just needed to add a statement to
open the workbook if the user selected one. It works perfectly now.
Thanks for the help.


All times are GMT +1. The time now is 05:48 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com