M
mooresk257
Hi,
I have the following code for a picture box to load an image file:
Private Sub Image1_Click()
FileToOpen = Application.GetOpenFilename("All Files
(*.jpg),*.jpg,(*.bmp),*.bmp")
Worksheets("Sheet1").OLEObjects("Image1").Object.Picture _
= LoadPicture(FileToOpen)
End Sub
which works fine unless I click "cancel" instead of selecting an image file,
at which point there is an error.
How to I allow the process to abort cleanly on "cancel"?
Thanks!
I have the following code for a picture box to load an image file:
Private Sub Image1_Click()
FileToOpen = Application.GetOpenFilename("All Files
(*.jpg),*.jpg,(*.bmp),*.bmp")
Worksheets("Sheet1").OLEObjects("Image1").Object.Picture _
= LoadPicture(FileToOpen)
End Sub
which works fine unless I click "cancel" instead of selecting an image file,
at which point there is an error.
How to I allow the process to abort cleanly on "cancel"?
Thanks!