Hallo,
ich bin neu hier.
Ich fand hier eigentlich die Antwort auf meine Frage, aber die Antwort funktionierte nicht.
Vielleicht kann mir jemand helfen.
Ich habe in einer Excel Tabelle mehrere Artikel mit Artikelnur., Beschreibung, u.s.w.
Im Feld A1= 01234, das ist die Artikel Nummer. Im Feld B1 soll nun automatisch der Pfad eines dazugehörigen Bildes eingefügt werden. Die Bilder sind im .jpg Format und liegen in einem Ordner. Das Bild hat den gleichen Namen, wie der Artikelname (1234, ...)
Ich hatte hier ein Script gefunden, das wie folgt lautet:
Option Explicit
Sub Bilder_einfügen()
Dim Pfad As String, Wiederholungen As Long
On Error Resume Next
Pfad = "C:\"
For Wiederholungen = 2 To Range("A65536").End(xlUp).Row
Cells(Wiederholungen, 3).Activate
ActiveSheet.Pictures.Insert(Pfad & Cells(Wiederholungen, 1) & ".jpg").Select
Next
End Sub
Wenn ich das mache, fügt er mir alle Bilder ein, und das noch zudem auf einer Stelle.
Bei mir soll aber der Pfad des Bildes eingefügt werden, also soll im Feld B1 = C:\Bilder\01234 stehen.
Ist das möglich?
Ich danke allen im Voraus!!!!
Lehrbub
