Cancelling a macro when hitting the "Cancel" button

Hi,

I wrote VBA code that saves some objects' properties to a CSV file.

Here is part of the code:

Filename = CorelScriptTools.GetFileBox(dialogBoxType, dialogBoxTitle, 1)

Set fs = CreateObject("Scripting.FileSystemObject")
    fs.CreateTextFile Filename
Set f = fs.GetFile(Filename)
Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)

Immediately following the Filename = CorelScriptTools.GetFileBox(dialogBoxType, dialogBoxTitle, 1) line, I would like to add some "error capture" features, for example if you click on the dialog's Cancel button.

I think this requires an If Then Else, but I don't know exactly what to write. Thank you so much in advance!

[Alex]

Yes, if the file box was canceled then the function will return an empty string. You just need to check for this:

Filename = CorelScriptTools.GetFileBox(dialogBoxType, dialogBoxTitle, 1)

If Filename <> "" Then
    Set fs = CreateObject("Scripting.FileSystemObject")
    fs.CreateTextFile Filename
    Set f = fs.GetFile(Filename)
    Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault)
    ...
End If