ich habe in meiner Tabelle 9 ImageControls (Entwicklertools - Steuerelemente -) und dort entsprechend Bilder.
Jetzt möchte ich gerne per Code die Bilder in die Userform reinladen.
Leider aber funzt das nicht. Der Code bricht in dem Moment ab, wenn Excel das Bild in die Userform alden sollte.
Ich rufe die Prozedur auf mit:
Sub Bild1_laden()
iPic = "IMG_9463"
UF_Pics.Show
End Sub
auszuführender Code:
Private Sub UserForm_Activate()
With Frame1
.ScrollBars = fmScrollBarsBoth
.ScrollHeight = .InsideHeight * 2
.ScrollWidth = .InsideWidth * 9
End With
With Me.Bilderrahmen
.Picture = Worksheets("Pics").iPic.Picture
.BorderStyle = fmBorderStyleNone
.PictureAlignment = fmPictureAlignmentTopLeft
.PictureSizeMode = fmPictureSizeModeClip
End With
End Sub
Was mache ich falsch?Ich muss die Bilder leider in der Mappe mitschicken, sonst würde ich es anders machen.
Danke
Jack