VBA to Select Multiple Files when one is too long

[mikechambers]

Trying to use the code below. If I select two files for example, and one of them is longer than 255 characters (including path), Excel will crash. It ignores my error handler and just crashes. I cannot figure out a way to get past this. Any ideas?


Sub Macro1()
Dim vSelectFiles As Variant
On Error GoTo EndLabel
vSelectFiles = Application.GetOpenFilename(MultiSelect:=True)
Exit Sub
EndLabel:
MsgBox "Check file name lengths"
End Sub