Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Shape Pfad ändern
#1
Hallo zusammen!

und zwar..

Ich habe eine Bestellliste mit etlichen Bildern erstellt ( unwissend, dass die eingefügten Bilder einen festen Dateipfad brauchen), nun da ich rausgefunden habe, dass die Bilder einen festen Dateipfad brauchen, hätte ich den gern dynamisch erstellt in verbindung mit "Thisworkbook.Path" eventuell.. oder besser eine Lösung um die eingefügten Bilder fest in die Mappe zu integrieren.. hat mir vll jemand eine Idee??
Eine Menge reden, aber nichts sagen können viele...
Antworten Top
#2
Ich kann's gerade nicht verstehen.. Im Betrieb hat es mir kein einziges Bild angezeigt, wenn ich den Dateipfad des Quellordners der Bilder geändert habe. Zuhause geht das auf einmal!! Gibt's da auch unterschiede zwischen 2010 und 365er Excel… ? Oder liegt's daran, dass sich der Bildordner und die Arbeitsmappe in einem Ordner befinden??...
Eine Menge reden, aber nichts sagen können viele...
Antworten Top
#3
Hallöchen,

Zitat:unwissend, dass die eingefügten Bilder einen festen Dateipfad brauchen

Da komm ich jetzt nicht ganz mit. Eingefügte Bilder brauchen doch keinen Pfad mehr?
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#4
Ich hab sie via VBA "insert.picture" eingefügt, und sie brauchen einen Pfad! Sobald ich den Ordner mit den Bildern verschiebe, sind sie in der Mappe verschwunden..! Außer sie sind im Ordner in dem sich die Mappe befindet!
Eine Menge reden, aber nichts sagen können viele...
Antworten Top
#5
Hallöchen,

Zitat:hab sie via VBA "insert.picture" eingefügt

hast Du nicht geschrieben Sad

Wenn Du sie manuell einfügst oder mit AddPicture und die entsprechenden Optionen einstellst brauchen Bilder keinen Pfad.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#6
Ojeee.. OK.. Danke!
Eine Menge reden, aber nichts sagen können viele...
Antworten Top
#7
Hättest du mir vll die richtigen Codezeilen bitte?
Eine Menge reden, aber nichts sagen können viele...
Antworten Top
#8
Hallöchen,

im Prinzip so:
Code:
Activesheet.Shapes.AddPicture Filename:="C:\Bilder\Bild.jpg", LinkToFile:=msoFalse, _
       SaveWithDocument:=msoTrue, Left:=0, Top:=0, Width:=-1, Height:=-1

Durch die beiden -1 wird das Bild in Originalgröße eingefügt. Du kannst z.B. vorher die Werte ermitteln und beim EInfügen verwenden.

Wenn Du mit dem Bild hinterher was anstellen willst, wäre es von Vorteil, es einer Objektvariable zu übergeben. Die verschiedenen Parameter kommen dabei in Klammern:

Code:
Set objShp = ActiveSheet.AddPicture(….)
objShp.Name = "MeinBild1"
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top
#9
Vielen Dank!! Perfekt!
Eine Menge reden, aber nichts sagen können viele...
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste