Need EXIT/Cancel Function for Application.GetOpenFileName

[shogunatwork]

Hello everyone, I need some assistance with some VBA code I'm working on.

Some background on this:
The below code works fine, so long as you DO select any number of photos above zero when the filepicker dialog pops up. If you hit Cancel, or the "X" button, it then gives 'Run-Time Error '13': Type Mismatch'.

I have tried several Exit functions for the Application.GetOpenFileName, none have so far worked, I keep getting the Type Mismatch error.
I DO understand I am missing a cancel checker argument, as stated, I have tried several, but they have all failed, so I am posting the code without one of those tests, in hopes someone can tell me what I'm doing wrong here.
Because at this point, I have no idea where to put a cancel button arguement checker, and I need some help!

Again, the code works for what I want it to do, and I can't use any MSO, or FileDialogs, I have to use the OpenFileName as a workaround for various reasons, but I need it to not result in an ERROR if Cancel is or "X" is clicked.

Please Login or Register  to view this content.

[6StringJazzer]

fpathArray will be False if the user exits without selecting a file, but if you test it for False and it's really an array you get a type mismatch error.

I also recommend you explicitly declare fpathArray. I strongly recommend to everyone that they declare variables. Doing so prevents a lot of bugs and runtime errors.

I succeeded with this:

Please Login or Register  to view this content.