Bild in Image laden
23.10.2007 07:36:36
Kocky
ich mal wieder. versuche ein Bild, mit Pfad Vorgabe in ein Image zu laden. Funtzt aber nicht, könnt Ihr mir sageb wo der Fehler liegt?
Private Sub CommandButton4_Click()
Dim strBild
Dim strPfad As String
strPfad = Worksheets("Daten").Range("J3")
strBild = Application.GetOpenFilename(strPfad)
If strBild = "" Or strBild = False Then Exit Sub
Me.Image2.Picture = (strBild)
End Sub
Danke
Kocky