Grafik gem. Zellinhalt anzeigen
Peter
ein Problem was mich schon seit Stunden quält: In Zelle AP16 erscheint per Sverweis der Speicherort einer Grafik, z.B. C:\images\grafik1.jpg Diese Bild soll dort angezeigt werden, wo ich den Platzhalter "Image1" possitioniert habe. Es klingt so einfach aber es glingt mir einfach nicht.
Mit folgendem Code hab ich's probiert:
Private Sub Workbook_SheetCalculate(ByVal Sh As Object)
If Sh.Name "Tabelle1" Then Exit Sub
With Worksheets(Sh.Name)
.Image1.Picture = LoadPicture(ThisWorkbook.Path & .Range("AP16"))
End With
End Sub
Entschuldigung dass ich so blöd frage aber ich komm da einfach nicht weiter. Falls es einfacher ist, die Grafik in einer bestimmten Zelle auszugeben (statt Platzhalter) - das ist mindestens genauso gut. Hauptsache es landet die Grafik irgendwie sichtbar in meiner Tabelle. Dann bin ich glücklich :-)
Ich danke schon mal vielmals für die Hilfe und Tipps. Guten Start ins Wochenende,
Peter
Anzeige