Application.FileSearch - Kriterium Autor?

• Application.FileSearch - Kriterium Autor? von Elena vom 14.10.2003 18:41:25
  • BuiltinDocumentProperties - von andreas e am 14.10.2003 19:06:22
  • AW: Application.FileSearch - Kriterium Autor? - von ChrisL am 14.10.2003 19:37:46
  • AW: Application.FileSearch - Kriterium Autor? - von Elena am 14.10.2003 20:04:17
    • AW: Application.FileSearch - Kriterium Autor? - von ChrisL am 15.10.2003 10:34:44

Betrifft: Application.FileSearch - Kriterium Autor?
von: Elena
Geschrieben am: 14.10.2003 18:41:25
Hallo zusammen
Ich möchte in einem Ordner nach Dateien eines bestimmten Autors suchen und diese in einem Excel-File ausgeben. Mit meinen beschränkten VBA-Kenntnissen kann ich den Code, den ich gefunden habe und soweit auch gut läuft, nicht anpassen. Kann mir jemand helfen? Oder kann man gar nicht nach dem Autor suchen?

Vielen Dank für Eure Bemühungen

Liebe Grüsse
Elena

Sub DateienAuflisten()
Dim lngAkt As Long
Dim rngBereich As Range
Dim rngZelle As Range
Const Verzeichnis = "C:\Dokumente und Einstellungen\Elena\Eigene
Dateien\Test\1"
'Verzeichnis = InputBox(("Bitte Pfad eingeben!"), "Verzeichnisse in Tabelle1", "C:\test\")
'Verzeichnis = ThisWorkbook.Path
With Application.FileSearch
.NewSearch
.LookIn = Verzeichnis
.SearchSubFolders = True
.FileType = msoFileTypeWordDocuments
.TextOrProperty = "Claudia"
.MatchTextExactly = True
'Hier den DateiTyp einstellen!
.Execute
'MsgBox .FoundFiles.Count
For lngAkt = 1 To .FoundFiles.Count
Cells(lngAkt, 1) = Mid(.FoundFiles.Item(lngAkt), Len(Verzeichnis) + 1)
Next lngAkt
End With
End Sub

PS: sucht so nach Claudia (Autor), aber das geht nur solange kein Dokument im Text Claudia geschrieben hat

Betrifft: BuiltinDocumentProperties
von: andreas e
Geschrieben am: 14.10.2003 19:06:22
hallo elena,
hast Du dir mal die Hilfe zu BuiltinDocumentProperties angesehen ?
vielleicht hilft das ja weiter !
Gruß
Andreas E

http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
http://www.fachforen.de
eine Linksammlung zu diversen fachforen

Betrifft: AW: Application.FileSearch - Kriterium Autor?
von: ChrisL
Geschrieben am: 14.10.2003 19:37:46
Hi Elena

Oder schau mal hier...
https://www.herber.de/forum/archiv/320to324/t321567.htm

Gruss
Chris

Betrifft: AW: Application.FileSearch - Kriterium Autor?
von: Elena
Geschrieben am: 14.10.2003 20:04:17
Vielen Lieben Dank
ich habe bereits versucht mit der BuiltinDocumentProperties-Funktion herumzuspielen. Ich bringe es jedoch nicht fertig.
Weiss jemand wie man dies anwendet?

Liebe Grüsse Elena

Betrifft: AW: Application.FileSearch - Kriterium Autor?
von: ChrisL
Geschrieben am: 15.10.2003 10:34:44
Hi Elena

Hast du dir das letzte Makrobeispiel im Link angesehen. Es werden alle Word-Dateien eines Verzeichnisses inkl. Autor gelistet.

Habe es selber nicht hingebracht, die BuiltInDocumentProperties abzuholen, ohne die Datei zu öffnen, was ein Nachteil ist.

Gruss
Chris

Excel-Beispiele zum Thema " Application.FileSearch - Kriterium Autor?"
Summe bilden, wenn Kriterium Zeichenfolge	Summe bilden, wenn Kriterium Zahl
Gültigkeitsliste nach Kriterium festlegen	Über benutzerdefinierte Funktion Filterkriterium anzeigen
Autofilterkriterium abfragen und filtern