Bild in excel anzeigen lassen
16.11.2004 16:55:31
c0bRa
ich habe folgendes problem:
ich will per VBA ein bild in excel anzeigen lassen. das makro funktioniert auch
Sub Makro1()
Range("d4").Select
ActiveSheet.Pictures.Insert( _
"C:\bla\Blaue Berge.jpg" _
).Select
End Sub
solange bis ich versuche den pfad variabel in abhängigkeit von einem wert zu stellen, welcher per sverweis aus tabelle2 in tabelle 1 geholt wird
in a1 wird die nummer des bildes angegeben und dann mit =SVERWEIS(A2;Tabelle2!A:H;2;FALSCH) der pfad ausgelesen.
tabelle2:
1 C:\bla\Blaue Berge.jpg
2 C:\bla\Sonnenuntergang.jpg
3 C:\bla\Wasserlilien.jpg
4 C:\bla\Winter.jpg
soweit so gut...
in c2 der tabelle1 wird der pfad wiedergegeben und auch der commandbutton1 befindet sich da nur bringt er mir immwe wieder den fehler 1004, die insert eigenschaft des pictures-objektes kann nicht zugeordnet werden...
Private Sub CommandButton1_Click()
Range("d4").Select
Worksheets("Tabelle1").Activate
ActiveSheet.Pictures.Insert(Worksheets("Tabelle1").Cells(3,2).Value).Select
End Sub
ist VBA so stur und verlangt beim insert nen fixen wert!?