I am trying to creat a macro to clear the picture out of the ActiveX Image box. This is my code for inserting the picture. I have 22 of these boxes and the code is the same for each excet each one replaces the 1 next to image with 2, 3, 4, 5 or on and so forth. I would like one macro to erase all pictures if possible.

Any help would be greatly appriciated! Thanks!


Private Sub Image1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    Image1.Picture = LoadPicture(Application.GetOpenFilename)
End Sub