Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
856to860
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

FileSearch und Datum als Selektion

FileSearch und Datum als Selektion
03.04.2007 14:50:00
eres
Hallo Excel-Freunde,
mit nachfolgendem Code drucke ich die PDF-Files eines bestimmten Directories.
With Application.FileSearch
.NewSearch
.LookIn = sPath
.Filename = "*.pdf"
.Execute msoSortByFileName
For i = 1 To .FoundFiles.Count
Shell ("C:\Program Files\Adobe\Acrobat 7.0\Reader\acrord32.exe /p /h " & .FoundFiles(i))
Next i
End With
Kann ich den obigen FileSearch einschränken, so dass nur Dateien mit einem bestimmten Erstell-Datum oder Änderungsdatum ausgewählt werden ?
Alternativ könnte ich dies natürlich auch in der For Next - Schleife abfragen.
Beim FileSearch wäre die Selektion aber eleganter, da ich dann schon vor der For Next Schleife die Anzahl der zu druckenden Files kenne und diese z.B. in einer UF anzeigen lassen könnte.
Vielen Dank für jede Antwort im voraus.
Gruss
erwin

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: FileSearch und Datum als Selektion
03.04.2007 14:56:00
Armin
schau mal in die Helpdatei von Excel da findest Du alles was Du brauchst.
Set fs = Application.FileSearch
With fs
.LookIn = "C:\My Documents"
.SearchSubFolders = True
.LastModified = msoLastModifiedYesterday
End With
Vielen Dank Armin (o.T.)
03.04.2007 14:57:00
eres
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige