online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon AWittemann vom 10.04.2020, 11:52 Options

Makro Bilder einfügern Excel 2007

Hallo,

vielleicht kann mir jemand bei meinem Makro Problem helfen!

Folgendes Makro funktionierte unter Excel 2003 super und funktiert unter 2007 nur noch eingeschränkt.

In 2003 hat es mir pro Zeile das Bild wiedergegeben von dem in Spalte A der Name stand. In Excel 2007 gibt das Makro alle Bilder in der ersten Zeile wieder ! Was muss ich ändern damit es wieder funktioniert ?

Hier das Makro:

Option Explicit

Sub Bilder_einfügen()
Dim Pfad As String, Wiederholungen As Long
On Error Resume Next

' Hier wird der Pfad angegeben in dem die Bilder liegen

Pfad = "H:\Bilder_auf_Server\grafik1\"
For Wiederholungen = 2 To Range("A65536").End(xlUp).Row

' Die Zahl in der folgenden Zeile steht für die Spalte in der das Bild wiedergegeben wird

Cells(Wiederholungen, 3).Activate

' Die Angabe in Anführungszeichen steht für die Dateiendung der Bilder
' Wenn in Spalte A nur die Artikelnr steht, steht in der Dateiendung der Rest des Dateinamens

ActiveSheet.Pictures.Insert(Pfad & Cells(Wiederholungen, 1) & "G1.jpg").Select
Next
End Sub


Antwort schreiben

Ähnliche Themen

Zellen auffüllen!
Platin7  13.07.2007 - 40 Hits - 24 Antworten

5 Minutenwerte raussuchen
Cherokee  19.03.2008 - 108 Hits - 3 Antworten

Makro in Excel für Pfadangabe
randy08  25.10.2007 - 171 Hits - 6 Antworten

inputbox VBA code ändern
aeberhard  24.11.2007 - 134 Hits - 2 Antworten

Excel und Uhrzeitenfilter bzw herraussuchen
Cherokee  03.12.2007 - 107 Hits - 7 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026