Jpeg Erstelldatum einlesen

Forumthread: Jpeg Erstelldatum einlesen

14.12.2006 14:20:23

Adem

Hallo Allerseits!
Ich habe ca.20000 Jpegs. Von diesen möchte ich das Erstelldatum bzw. wann es geändert wurde in Excel einlesen. Ist sowas möglich?
Habe schon "gegooglt", jedoch keine brauchbaren Ergebnisse gefunden.
Erwartungsvoll und Grüße aus Südhessen
Adem

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Jpeg Erstelldatum einlesen

14.12.2006 14:34:37

ransi
Kleine Korrektur...

14.12.2006 14:40:57

ransi
AW: Kleine Korrektur...

14.12.2006 14:55:48

Adem

AW: Jpeg Erstelldatum einlesen

14.12.2006 14:34:37

ransi

HAllo Adem
Test mal dies hier:

Option Explicit
Public Sub test()
Dim Fs As FileSearch
Dim FsO
Dim Datums
Dim Bild
Dim L As Long
Set Fs = Application.FileSearch
Set FsO = CreateObject("Scripting.FileSystemObject")
L = 1
With Fs
    .NewSearch
    .LookIn = "D:/" 'Pfad anpassen
    .Filename = "*.JPEG"
    .SearchSubFolders = True
    .Execute
            For Each Bild In .FoundFiles
            Set Datums = FsO.getfile(Bild)
                Cells(L, 1) = Bild
                Cells(L, 2) = Datums.datecreated
                Cells(L, 3) = Datums.dateLastModified
                L = L + 1
            Next
End With
End Sub

Code eingefügt mit Syntaxhighlighter 4.0

ransi

Kleine Korrektur...

14.12.2006 14:40:57

ransi

Hallo
...damit du auch wirklich alle erwischt:
.Filename = "*.jp*g"
ransi

AW: Kleine Korrektur...

14.12.2006 14:55:48

Adem

ransi....ich bin fassungslos.....
ich such schon seit 4h im Internet rum, nach einer Software die die Dateien archiviert...und du----unfassbar!!!!!!!
EIN RIESENDANKESCHÖN!
Wirklich, das ist das beste Forum der Welt!!
DANKE!
ADEM

;

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe

excel wenn wort dann zahl

15447
excel feld farbe wenn andere zelle bestimmten wert hat

15284
excel anzahl zeichen bis zu einem bestimmten zeichen

13585

Weitere Forumthreads anzeigen

excel zelle färben wenn wert in anderer zelle

11498

excel zelleninhalt um zeichen erweitern

10204

excel zeichen für enthält

9317

excel liste lässt sich nicht scrollen

8870

excel formeln kopieren ohne bezug ändern

8478

excel erste drei zeichen löschen

8403

excel wenn dann andere zelle schreiben

7643

sverweis summewenn

7279

excel zelle enthält textteil

7098

excel negative werte als 0 anzeigen

7001

excel bedingte formatierung wenn andere zelle wert dann farbe

6841

excel autosumme zeigt 0 an

6767

excel bestimmtes zeichen entfernen formel

6686

excel text abschneiden von links

6602

excel duplikate nicht zählen

6599

excel führende nullen löschen

6346

excel nach zeichen abschneiden

6221

wenn zahl in spalte vorhanden dann

6178

datum zählen excel

6038

excel zählenwenn mit oder bedingungen

5987

excel text nach zeichen ausgeben

5956

datum und uhrzeit in einer zelle excel

5903

excel zelleninhalt ab einem bestimmten zeichen

5854

vba excel letzte zeile

5591

excel zeilenumbruch in formel

5580

excel text in spalten nur erstes leerzeichen

5547

verketten excel zeilenumbruch

5310

excel zeilen bedingt ausblenden

5232

excel vba bereich auskommentieren

5054

excel zählenwenn bestimmter text

5017

verlinkung excel tabellenblatt

4850

excel zeichen am ende entfernen

4822

excel mauszeiger kreuz statt pfeil

4732

excel zeichen aus zelle auslesen

4677

zellen verbinden word tastenkombination

4646

excel vba zelle löschen

4576

anführungszeichen in excel formel

4544

excel vba text in zelle schreiben

4496

verbinden und zentrieren excel geht nicht

4435

wenn datum älter als x dann rot

4383

excel in welcher zeile steht der wert

4195

wenn formel mit datumsvergleich

4118

excel summewenn kleiner 0

4101

vba hintergrundfarbe

4007

excel wenn bereich leer dann

4005

excel summewenn nicht

3962

excel kalenderwoche in monat

3934

excel kilometer berechnen

3927

excel wert zelle übernehmen ohne formel automatisch

3894

excel monat jahr aus datum

3857

#nv durch 0 ersetzen

3816

excel name von tabellenblatt in zelle

3771

dropdown excel mit wenn funktion

3747

excel wenn 0 dann leer formatierung

3728

excel datumsformat wird nicht übernommen

3666

excel vba suchfunktion

3618

vba programm abbrechen

3618

excel wert einfügen wenn bedingung erfüllt

3607

shortcut tabellenblatt wechseln

3600

summe wenn mehrere spalten

3600

excel blattschutz aufheben zip

3557

2 links in eine zelle excel

3532

excel text aus zelle in andere zelle übernehmen

3523

excel wenn mit uhrzeit

3512

msgbox vba ja nein

3511

finden excel von rechts

3481

excel-formel größer als und kleiner als

3459

excel wenn zelle grün dann

3420

excel formel nur zahlen aus zelle übernehmen

3411

punkt entfernen excel

3381

excel 1. wort aus zelle

3358

summewenn ungleich

3347

excel summewenn datumsbereich

3338

excel zellen sperren aber filtern zulassen

3327

Jpeg Erstelldatum einlesen

3251

excel formel summenprodukt

3227

excel zeit jetzt

3220

excel runterziehen nicht fortlaufend

3169

excel bedingte formatierung übertragen auf andere zellen

3115

sverweis wenn kein wert dann leer

3098

excel gestrichelte linien druckbereich ausblenden

3027

excel zeichen nach bestimmten zeichen löschen

3011

bedingte formatierung wenn wert größer als andere zelle

2997

excel vba spalten löschen

2930

excel reiter namen auslesen

2914

excel erste 3 zeichen löschen

2912

excel text entfernen

2910

teilergebnis zählenwenn kombinieren

2903

dezimalstunden addieren

2902

excel vba fileexists

2902

excel vba wait 1 second

2899

excel spalten gruppieren und benennen

2883

excel diagramm kopieren ohne verknüpfung

2836

excel text hinzufügen

2829

excel aktuelles datum einfügen ohne aktualisierung

2810

excel minuten in zeit umrechnen

2809

excel makro schützen passwort

2790

Forumthread: Jpeg Erstelldatum einlesen

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread