Danke nochmals für Deine Antwort.
Leider funktioniert der Code bei mir nicht. Ich habe ihn unter „DieseArbeitsmappe“ eingefügt und entsprechend angepasst (Pfad). Beim Ausführen erscheint die Meldung „Laufzeitfehler 1004: Anwendungs- oder objektdefinierter Fehler“.
Ich habe noch einen weiteren Code getestet, bei welchem dieselbe Meldung erscheint:
Sub test()
Dim strPfad As String
strPfad = "I:\test\Unterschriften\" & Application.UserName & ".jpg"
ActiveSheet.Shapes.AddPicture((strPfad), False, True, 100, 200, 400, 200).Select
End Sub
Kann es daran liegen, dass das entsprechende Laufwerk in einem Netzwerk ist?
Liebe Grüsse
donjuandan