Wie kann man Bilder aus einem Ordner nach Excel importieren mit einem Makro?

Ich habe einen Ordner mit ziemlich vielen Bildern auf der Festplatte die alle sauber benannt sind. Dann habe ich noch eine Excel-Tabelle mit dem Dateinamen der Bilder. In dieser Tabelle ist aber nur ein Teil davon enthalten. Wie schaffe ich es anhand eines Makros, dass nur die Bilder aus dem Ordner gezogen werden die mit den Dateinamen in der Excel-Tabelle übereinstimmen?

Beispiel: Ordner mit Bilder auf Festplatte hat den Namen Fotoarchiv 2012 Dieser Ordner enthält u.a. die Bilder mit den Dateinamen Foto1, Foto2, Foto3, Foto4 usw. In der Excel-Tabelle ist aber nur Foto1 und Foto3 angegeben

Es sollen genau diese Fotos neben dem Dateinamen des Bildes in der Excel-Tabelle hinterlegt werden.

3 Antworten

Distel35

Nutzer, der sehr aktiv auf gutefrage ist

im Thema Microsoft Excel

04.12.2013, 22:01

Warum willst du die Bilder in Excel drin haben?
Was ist dein Plan oder was bezweckst du damit?
Wieviele Bilder sind das insgesamt pro Excel-Datei?

Distel

LittleBimbo

Fragesteller

05.12.2013, 08:12

Danke für deine Antwort. Es sind ca. 200 Bilder. Ich will mir da eine Übersicht machen, dass ich einen schnellen Überblick über die Bilder habe und mir zusätzlich Kommentare dazu schreiben kann. Jedoch sind mir nicht alle Bilder wichtig da manche eine zu schlechte Qualität aufweisen (die trotzdem behalten werden sollen) und andere nicht dazu passen.

Distel35

12.12.2013, 00:07

@LittleBimbo

Hallo,

schau dir mal die beiden Programme irfanview und Adobe Lightroom an, da kannst du Bilder kategorisieren, taggen und Informationen dazuschreiben. Danach kannst du alle Fotos sortieren oder filtern, ganz nach Belieben.

Gruß Distel

LittleBimbo

Fragesteller

19.12.2013, 13:40

@Distel35

Hat sich mittlerweile erledigt. Ich habe es mithilfe eines Makros hinbekommen.

ViceWegas

11.08.2014, 12:14

@LittleBimbo

Hi,

diese Umsetzung benötige ich auch. Weißt du noch, wie du das per Makro hinbekommen hast?

adi120369

Nutzer, der sehr aktiv auf gutefrage ist

im Thema Office

21.07.2016, 13:52

mit IMAGE-XLS kann man einen ganzen Ordner mit Bildern - also einen Bildordner nach Excel importieren

adi120369

Nutzer, der sehr aktiv auf gutefrage ist

im Thema Office

26.05.2016, 22:18

Hallo, wenn man das mit einem Makro einfügt, kann man die Tabelle dann aber nicht filtern oder neu sortieren. Es gibt da aber ein Tool, was das alles kann. Kostet zwar ein wenig, aber spart auch jede Menge Arbeit. Das Tool heißt image-xls und kann automatisiert Bilder nach Excel einfügen, bzw. in Bilder in Tabelle einfügen

Ähnliche Fragen

VBA - Daten in andere Datei schreiben

Ich habe ein Excel-sheet mit Daten und Makros. Nun möchte ich die Daten in eine neue Excel Tabelle schreiben, so das keine Makro-Sicherheits meldung beim öffnen der ausgegeben Datei kommt.

Wie geht das?

...zur Frage

Excel Makro .AutoFilter variable Range?

Hallo,

ich habe ein simples Excel Makro aufgenommen, in der ich eine Tabelle nach bestimmten Kriterien Filtern muss. Die Tabelle kann variabel lang sein.

Durch die Funktion "Makro aufzeichnen" habe ich folgendes:

"ActiveSheet.Range("$A$1:$S$249").AutoFilter Field:=15, Criteria1:="0""

Wie kann ich die Zeilenlänge durch eine Variable ersetzen? Die Länge der Tabelle würde ich einfach durch:

X = (Range("A2").End(xlDown).Row)

ermitteln.

Bitte um Entschuldigung für die Frage, ich schreibe nur sehr selten Makros.

Vielen Dank für eure Hilfe. :)

...zur Frage

Wie kann man ein Makro in mehreren Zeilen wiederholen?

Ich soll für einen Bekannten in der Feuerwehr ein Makro zu einer Excel Liste schreiben. Konkret: - Wenn in Spalte B ein "A" für Atemschutz steht, soll die Zeile rot hinterlegt werden. Das Makro dazu habe ich auch schon geschrieben. Das Problem: Ich müsste dieses Makro jetzt für jede Zeile neu kopieren und abändern. Gibt es eine Möglichkeit das Makro für jede Zeile zu wiederholen?

Tabelle und Makro anbei.

...zur Frage

Excel 2007: Suchergebnisse in eine neue Tabelle eintragen

Liebe Community,

ist es möglich, die Ergebnisliste der Excel-Suchfunktion in eine neue Tabelle oder ein neues Tabellenblatt schreiben zu lassen?

Ich habe folgendes Problem:

In einer riesigen Excel-Tabelle (Excel 2007) suche ich nach bestimmten Werten über alle Tabellenblätter (>50). Die Ergebnisliste der Excel-Suche (Strg+F) beinhaltet fast alles, was ich wissen muss, vor allem aber den Namen des Blattes, in dem der Wert gefunden wurde und eben den Wert selbst. Leider habe ich keine Möglichkeit gefunden, diese Ergebnisliste abzuspeichern. Am liebsten würde ich die Suche auch leicht abändern, so dass auch der Name des Bereiches, in dem der Wert gefunden wurde, mit in der Ergebnisliste steht.

Für eine Idee wäre ich sehr dankbar. Makros sind mir nicht fremd, aber ich bin kein "VBA-Checker" und habe es nicht geschafft, ein entsprechendes Makro zu bauen. Vielleicht kann man das auch über ein Suchformular lösen, aber mit der Erstellung solcher Abfrageformulare kenne ich mich leider auch gar nicht aus.

Hat hier irgendwer eine Idee? Danke im Voraus!!!

Astro7x7

...zur Frage

Excel Aktive Zelle auslesen VBA?

Ich habe eine Tabelle in Excel erstellt. Nun ist dort ein Button, der auf Knopfdruck ein Makro ausführt, das, wenn die aktuelle entweder B2 oder C6 oder D10 ist, in diese Zelle eine 5 einträgt. Wie kann ich das mit einer If-Anweisung umsetzen (mithilfe von Or-Operatoren)?

Also ich meine so in die Richtung

If ActiveCell = B2 Or C6 Or D10 Then

Active Cell.Value = 5

Else

MsgBox("Das Argument ("5") ist nicht mit der aktuellen Zelle kompatibel.")

End If

Nur dass das oben nie funktioniert, weil ich nicht weiß, wie ich mehrere Zellen als richtig ansehen lassen kann.

Kann mir jemand das richtige Makro zeigen?

...zur Frage

Laufzeitfehler 429 in VBA (Excel Makro)?

Hallo!

Zurzeit versuche ich mich an VBA. Ich habe ein Makro erstellt, dass aus einer Excel Tabelle z.B. eine Rechnung erstellt ( durch befüllen der Texftfelder einer Vorlage )

Nun wollte ich das Makro so umändern, dass automatisch der richtige Pfad zum Speichern bzw Öffnen der Vorlage, für den jeweiligen Windows Nutzer benutzt wird. ( Das habe ich mithilfe von Workbook.Path gemacht.

Allerdings gibt er mir jetzt immer Laufzeitfehler 429 aus und ich weiß nicht was zu tun ist.

Bitte helft mir. ( Office und Word sind up to date )

Grüße

Chris

Hier mein Code: https://paste2.org/E8ZmvBXk

...zur Frage

Wie kann ich in Excel ein Makro ausführen, wenn ein Filter von einer Tabelle geändert wird?

...zur Frage

Excel Inhaltsverzeichnis?

Ich habe eine Tabelle mit Filmen und weiteren Details. Jetzt möchte ich jedoch ein Inhaltsverzeichnis erstellen, wo der Name mit einem Link hinterlegt ist, der direkt zu dem Film führt.

Wie gestalte ich soetwas möglichst einfach? Makros scheinen mir hier zu schwer zu sein.

...zur Frage

Excel Makro sucht nach Variable und löscht Datensatz!?

Hallo liebe Community,

ich bräuchte eure schnelle Hilfe wieder einmal. Ich habe ein schönes Makro, das an sich super funktioniert. Es sucht nach einer Variable und löscht entsprechend alle Zeilen, wenn man es auslöst.

Beispiel es soll B1 suchen und wenn vorhanden, alle 4 Datenreihen in der Tabelle löschen. Leider habe ich das Problem, an dem ich gerade verzweifle, dass Excel nicht nur B1 löscht, sondern wenn vorhanden, auch B10, B11, B12, B13, B14, B15, B16, B17, B18 und B19

An welcher Stelle des Makros kann ich es ändern, dass Excel wirklich nur das sucht und löscht, was auch tatsächlich gesucht wird.

Mein Makro:

Sub B1_weg()
Dim lngZ As Long
For lngZ = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
  If InStr(Cells(lngZ, 4), "B1") > 0 Then
    Cells(lngZ, 1).EntireRow.Delete
  End If
Next
End Sub

Vielen Dank im Voraus!

...zur Frage

Excel Inhalt von einer Tabelle Live in andere mitkopieren lassen?

Hallo

Im Anhang sind die beiden Tabellen zu sehen. Der gelbe Inhalt

soll in die Lücken unter das jeweilige stichwort in der 2. Tabelle gelangen.

Hat Jemand eine Idee, wie das geht, ob makro oder Befehl ist egal.

( Hab es per Makro und sverweis versucht und in beiden Fällen ging es leider nicht auf)

Außerdem wird es ca 32. Seiten der 1. Tabelle geben und somit auch 32 Zeilen in Tabelle 2.

Ich freue mich über jede Hilfe und Rückfrage.

Danke

...zur Frage

Excel VBA activesheet statt tabellenname?

Hallo,

ich habe ein Makro aufgezeichnet und ich möchte dass die Formeln welche ich geschrieben habe immer von der aktiven Tabelle genommen werden.

Dadurch, dass ich das Makro aufgezeichnet habe, ist mir erst später aufgefallen, dass in den Formeln in den Zellen immer der Tabellenname steht: =WENNFEHLER(SVERWEIS(30;'42297033'!A5:T5;3;);"")

Ich möchte aber, dass diese Formeln immer die Tabelle nehmen, in der das Makro ausgeführt wurde.

Im Makro steht z.B. folgendes:

ActiveCell.FormulaR1C1 = _

"=IFERROR(VLOOKUP(30,'42297033'!R[3]C[-2]:R[3]C[17],3,),"""")"

'42297033' ist in dem Fall der Tabellennamen.

Noch zur Info was das gesamte Makro macht:

Ich erstelle eine neue Tabelle -> übertrage gewisse Daten von der alten Tabelle in die neue und das mit Formeln wie SVerweis() oder Wenn()

Kann ich Makro den Tabellenname durch etwas ersetzen, damit es richtig funktioniert?

Wäre schön wenn mir jemand helfen könnte, ich muss das spontan machen und bin ganz neu bei VBA

LG Benni

...zur Frage

Excel Makro - bestimmte Zeilen mit Bedingung kopieren auf neues Blatt?

Hallo an alle,

Ich möchte ein Makro für eine Tabelle bauen wo ich selbst bei den Katogorieren ein X setzen kann um damit Excel zu zeigen welche Daten in ein neues Arbeitsblatt kopiert werden sollen.

Hier zwei Bilder als Beispiele von Ist zu Soll.

Ist:

Soll:

Ziel sollte es sein ein Lieferant zu filtern und mir nur die Daten auf ein extra Blatt anzuzeigen wo ich ein X gesetzt habe.

Ich hoffe einer von den Excel Experten kann mir da helfen.

VJohann

...zur Frage

Was muss man in Excel eingeben, damit das Datum nicht aktualisiert wird?

Hallo, ich habe wieder eine Excel Frage: ich habe eine Tabelle, Spalten A-H. In der Spalte G habe ich den Status, wo ich eine DropDown-Liste habe und zwischen: "in Bearbeitung", "Material bestellt", [...], "erledigt" auswählen kann. In Spalte H habe ich als Überschrift "erledigt am", es soll also in Spalte H, sobald ich in Spalte G den Status "erledigt" ausgewäht habe, das aktuelle Datum erscheinen. Ich habe also in Spalte H folgende Formel: "=WENN(G50="erledigt";TEXT(JETZT();"TT.MM.JJ");"")". Ich glaube, ihr wisst, worauf ich hinaus wil, also nach dem Speichern soll dich das Datum nicht ändern, tut es aber natürlich. (Ist ja klar!) Aber, da ich erst seit ein paar Monaten mit Excel arbeiten, habe ich noch keine Ahnung. Durch das Stöbern im Internet, habe ich rausgefunden, dass es nicht einfach so funktioniert (oder doch?), sondern, dass man dafür ein Makro braucht (wovon ich absolut keine Ahnung habe). Also so weit bin ich: ich habe die Tabelle offen vor mir, ich klicke auf den Tabellen-Namen und klicke auf "Code anzeigen", dann öffnet sich ja ein Makro Fenster. So, was soll ich nun machen? Ihr wisst ja, welche Spalte ich brauche, es wäre schön einen Code zu haben. :-) Und wenn ich da den Code eingefügt habe, was muss ich dann machen? Ich würde dann auf "speichern" klicken, dann öffnet er ja ein Fenster und weist mich darauf hin, dass ich die Datei als eine Mappe mit Makros speichern muss. Richtig? Dann würde ich das tun. Und dann wenn ich das gespeichert habe, müsste ich die Makros (-> "Inhalt aktivieren") jedes Mal, wenn ich die Datei öffne anklicken, oder? und dann habe ich das, was ich will. Bitte helft mir, ich verzweifle so langsam...

...zur Frage

Excel VBA Pfeiltasten überwachen?

Wie kann ich in Excel die Pfeiltasten überwachen lassen, d. h., immer wenn ich in der Tabelle "Tabelle1" die rechte Pfeiltaste drücke, soll nicht die Zelle rechts von der aktuellen Zelle ausgewählt werden (wie es ja normal wäre), sondern das Makro "Makro1" ausgeführt werden.

Geht das überhaupt?

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen