Clever-Excel-Forum

Normale Version: Fotos automatisch hinzufügen [Template]
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2
Hallo Manu, :19:

dann so: :21:
[attachment=19218]
Das klappt hervorragend!!

Super, vielen Dank!

Jetzt sehe ich aber keinen Code mehr um den Pfad anzupassen.  :19:


Wie komme ich da dran?

Super Arbeit von dir, man besten Dank das erleichtert mir wirklich viel !!!
Hallo, :19:

das war ja hier: :21:


Code:
Set objShape = Me.Shapes.AddPicture( _
    "C:\Temp\" & Target.Text & ".jpg", _
    msoFalse, msoTrue, rngTMP.Left, rngTMP.Top, -1, -1)
Danke!


 Set objShape = Me.Shapes.AddPicture( _
                    "\\SYNOLOGY\WebDev\art" & Target.Text & ".jpg", _
                    msoFalse, msoTrue, rngTMP.Left, rngTMP.Top, -1, -1)


Funktioniert nicht, da es ein Netzwerkpfad ist, oder?

Man ich bin dir so Dankbar!! Big Grin
Hallo, :19:

sollte klappen, aber muss es nicht...


Code:
"\\SYNOLOGY\WebDev\art\" & Target.Text & ".jpg"

... heißen (Backslash nach art).
HEUREKA

Es funktioniert!!

Tausend Dank.


Wow, ich bin wirklich begeistert!!!!!

Super Arbeit von Dir!!
Bitte prüfe mal deine PN!

Liebe Grüße!
Hallo Manu, :19:

habe ich geprüft, da ist nichts neues drin. :21:
Dann werde ich dir eine Email geschickt haben Wink
Seiten: 1 2