Office: Bilder in Exceldatei per VBA einfügen/einbetten

Hallo zusammen,

Ich habe hier im Forum einen passendenden Code für meine Bedürfnisse gefunden.
Link zum Thread: http://www.ms-office-forum.net/forum...d.php?t=279335

Allerdings werden die Bilder nicht in die Excel-Datei eingebettet sondern nur als Link. Die Bilder liegen nicht auf dem PC sondern auf einem Server.
Wenn die Datei auf einem anderen Rechner geöffnet wird, ohne Zugriff auf den Server, werden die Bilder nicht angezeigt.

Verwendete Excel-Version: 2010

Kann man das Problem ändern?

Ich habe die Frage schon im Original Thread gestellt, habe aber nicht gesehen, dass der Thread als erledigt markiert wurde.

Es handelt sich um folgenden Code:
Code:

Danke im vorraus

Gruß
Andreas

:)

 

Hi Andreas,

vielleicht hilft das hier:

Code:

 

Hallo
Schaue dir mal diesen Beitrag an:
http://www.ms-office-forum.net/forum...d.php?t=319171

Gruss,
Tinker Bell

 

Hi,

dein dort geposteter Code ist genau derselbe Code (mit einigen zu vernachlässigenden Abänderungen) wie der vom Fragsteller gepostete aus dem von ihm verlinkten Thread - sogar der Titel des Diagalogs und der Ordnername stimmen 1:1 überein. Und der Code funktioniert beim Fragesteller eben NICHT.

 

Hallo Karin
Im Eingangsbeitrag wurde beschrieben dass mit seinem Ansatz die Bilder nur verlinkt werden und nicht ins Dokument eingefügt.

In dem von mir geposteten Code, werden die Bilder eingefügt. Es ist nicht erforderlich Zugriff auf eine bestimmte Quelle zu haben, wenn die Bilder im Dokument eingefügt wurden.
Und dies ist doch was gesucht wird, oder?

Oder übersehe ich etwas?

Gruss,

Tinker Bell

 

Hallo,

@Beverly
Ich habe den Code so übernommen, die Zielbereiche und den entsprechenden Ordner abgeändert und der Code funktioniert einwandfrei. Bis auf das beschriebene Problem.
Ich habe den Code aus dem anderen Thread hier reinkopiert, da ich nicht weiß ob in einen abgeschlossenen Thread noch Jemand reinschaut.
Ich werde Deine Änderung morgen ausprobieren und auf jeden Fall Bescheid geben.

@Tinker Bell
ich werde mir Deinen Vorschlag auch erst Morgen in der Arbeit ansehen.

Danke für die schnelle Hilfe.


Gruß
Andreas

 

Hi,

Richtig - aber schau dir doch mal die beiden Codes genau an:

geposteter Code von Andreas

Code:

und der aus deiner Mappe:
Code:

Das sind im Prinzip (mit ein paar kleineren unwesentlichen Abänderungen) dieselben Codes. Das Problem liegt in den blau markiereten Zeilen, die in beiden Codes identisch sind.

 

Hi Andreas,

Dagegen ist auch nichts einzuwenden *wink.gif* und dass du den alten Thread verlinkt hast ist auch völlig korrekt.
Da ich an dem anderen Thread beteiligt war, habe ich zwar eine Benachrichtigung bekommen, aber du hattest den neuen Thread schon eröffnet, ehe ich Zeit hatte zu reagieren - aber das spielt ja nun keine Rolle mehr. *Smilie

 

Hallo Beverly,

Dein Code funktioniert. Danke dafür.
Allerdings wird jetzt das Seitenverhältnis der Bilder geändert.

Das passierte mit dem "anderen" Code nicht.
Wahrscheinlich ist es kein Problem das zu ändern, allerdings habe ich von VBA-Programmierung nicht viel Ahnung, zumal ich alle paar Jahre vorhandene Dokumente abändere.

Hier mein Code:
Code:

Ist es vielleicht auch möglich die Reihenfolge der Bilder so zu ändern, dass das zuerst angewählte Bild in ersten Bereich eingefügt wird? Das zweite angewählte Bild im zweiten Bereich usw.

@Tinker Bell
leider habe ich Deine Lösung nicht ausprobieren können.
Die Zeit hat heute nicht ganz gereicht.

Auf jeden Fall danke für die Hilfe an Beide.


Gruß
Andreas

 

Hi Andreas,

zu Problem 1: ändere den Code wie folgt

Code:

Zu Problem 2: die Bilder werden immer in der Reihenfolge eingefügt, wie ihre Reihenfolge im Ordner ist - es gibt keine Unterscheidungsmöglichkeit, welches bei der Auswahl zuerst angeklickt wurde, zumindest ist mir nichts derartiges bekannt.

 

Hallo Beverly (Karin),

zu Problem 1
die Lösung hat natürlich geklappt. In den paar freien Minuten habe ich es noch schnell vor dem Feierabend usprobieren können. Vielen Dank dafür.

zu Problem 2
sowas habe ich befürchtet.
Die Frage ist bloß
aufgekommen, da ich mal beim Import von txt-Dateien im Excel, mal genau das Problem hatte. Die Dateien wurden in der Reihenfolge des anklickens importiert. Das war damals für den Fall ungewünscht.

Aber das Problem war auch für eine Tabelle in der Mappe.
Dafür habe ich eine andere Lösung und versuche sie jetzt einzubauen. Vorerst will ich das alleine versuchen *wink.gif* .
Fallses wirklich noch ein Problem geben sollte werde ich mich melden.

Danke und noch ein schönes Wochenende.

Viele Grüße
Andreas