Bild aus geschlossener Datei per Kamera
15.09.2005 09:47:26
R.Schmitt
mit den folgenden Zeilen, mache ich einen Schnappschuß per
"Kamera" aus einer geschlossenen Datei, in der ich einige
Firmenlogos liegen habe und die ich nicht jedes mal extra
für den Import öffnen will. Wohlgemeinten und richtige Rat-
schlägen die Logos doch als Datei zu speichern und auch zu
importieren, muß ich leider eine Absage erteilen. Es geht
darum die Logos als ein Picture mit einem Verweis auf den
Bereich der geschlossenen Datei zu generieren :
Sub Bild_einfügen()
Application.CutCopyMode = False
ActiveSheet.Pictures.Paste.Name = "img"
ActiveSheet.Shapes("img").Select
Selection.Formula = "'C:\Excel Beispieldateien\[bilderlieferant.xls]Tabelle1'!$D$5"
ActiveSheet.Shapes("img").Top = Range("B3").Top
ActiveSheet.Shapes("img").Left = Range("B3").Left
Application.CutCopyMode = False
End Sub
Das Problem :
Das Bild ist da - der Verweis auch - das Bild nicht.
Erst bei Doppelklick - dann öffnet sich zu allem Überfluß
auch noch die Datei aus der das Bild kommt - wird der im
Verweis genannte Bereich auch in meinem Picture angezeigt.
Die Frage:
Wie bekomme ich es hin einen Bereiich in einer weiteren
geschlossenen Datei als Bild in meiner aktuell bearbeiteten
Tabelle "on the fly" anzuzeigen ?
Gruß
R.Schmitt