Hi! Does anyone know why this code won't display a selected image from a file picker, in a user form?
Private Sub ImgProfile_Click()
With Application.FileDialog(msoFileDialogFilePicker)
.AllowMultiSelect = False
.ButtonName = "Submit"
.Title = "Please Select an Image of a Student"
.Filters.Add "Image", "*.bmp, *.jpeg", 1
If .Show = -1 Then
Me.Image1.PictureSizeMode = fmPictureSizeModeStretch
Me.Image1.Picture = LoadPicture(.SelectedItems(1))
Else
MsgBox "No image selected"
End If
End With
End Sub
Bookmarks