Image Bild laden
19.04.2009 19:30:10
Mike
ich probiere gerade ein Bild, welches auf Tabelle3 hinterlegt ist in einem Image (Img_super) in ein Image auf Tabelle2 einzuspielen mit folgendem Befehl
Private Sub ComboBox2_Change()
With Worksheets(Tabelle1)
If ComboBox2 = "Super" Then
Worksheets("Tabelle2").Image5.Picture =Sheets("Tabelle3").OLEObjects("Img_super").Object. _
Picture
End If
End With
End Sub
Das funktioniert soweit, wenn das Image sich wie die ComboBox auf Tabelle1 befindet, leider klappt es nicht auf dem Tabellenblatt2?
Grüße, Mike
Anzeige