Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 11:56:21
Export bestimmter Spalten in eine neue Exceldatei
24.04.2024 11:32:28
Formel für die letzten 1-2 Zeichen
24.04.2024 11:13:07
Eingezeichnete Standardabweichung im Graphen begrenzen
24.04.2024 11:06:38
WENN; zwischen zwei Daten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
820to824
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
820to824
820to824
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Suchprobleme mit Application.FileSearch

Suchprobleme mit Application.FileSearch
17.11.2006 13:15:21
Karsten
Hallo Excelgemeinde,
habe folgendes Phänomen:
unter NT4.0 funktioniert der folgende Code
With Application.FileSearch
.NewSearch
.LookIn = sSource
.FileName = "1*.xls"
.SearchSubFolders = False
.Execute
aber unter W2K nur der Code
With Application.FileSearch
.NewSearch
.LookIn = sSource
.FileType = msoFileTypeExcelWorkbooks
.SearchSubFolders = False
.Execute
Wie kann ich jetzt eine Suche unter W2K nach z.B. "1*.xls" oder "1*.pdf" realisieren.
Gruß Karsten

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchprobleme mit Application.FileSearch
17.11.2006 15:39:12
Stefan
Hallo Karsten,
Bei mir (mit Office 2003 und Windows XP) funktioniert auch der Code den Du fuer NT stehen hast. FileName ist noch immer eine gueltige Eigenschaft von FileSearch. Wo bekommst Du denn eine Fehlermeldung wenn Du den Code im Debug-Mode auf Win2K laufen laesst?
Schoene Gruesse
Stefan
AW: Suchprobleme mit Application.FileSearch
17.11.2006 16:16:18
Karsten
Hallo Stefan,
unter W2K im Debug läuft kein Fehler auf.
Aber sobald ich das Makro im Einzelschritt oder auch normal laufen lasse, kommt der Fehler:
Laufzeitfehler '5':
Unzulässiger Prozeduraufruf oder ungültiges Argument
und das Makro bleibt dann an der Position:
.FileName = "1*.pdf"
stehen.
Gruß Karsten
Anzeige
AW: Suchprobleme mit Application.FileSearch
22.11.2006 09:31:48
Karsten
Hallo Stefan,
der von MS vorgeschlagene Code müßte leider umgeschrieben werden, doch da streiken meine VBA Kenntnisse.
Deshalb hier der von mir angewendete Code, der mit Excel 8.0 unter NT4 läuft aber nicht unter W2K. Vielleicht könnte da jemand mir eine Lösung vorschlagen.
With Application.FileSearch
.NewSearch
.LookIn = sSource
.FileName = "1*.pdf"
.SearchSubFolders = False
.Execute
iCount = .FoundFiles.Count
For iCounter = 1 To iCount
If iCounter Mod 100 = 0 Then Range("D5").Value = _
"Bearbeite Datei Nr. " & iCounter & "..."
wks.Cells(iCounter + 1, 2).Value = .FoundFiles(iCounter)
wks.Hyperlinks.Add _
anchor:=wks.Cells(iCounter + 1, 2), _
Address:=.FoundFiles(iCounter)
DatName = wks.Cells(iCounter + 1, 2).Value
Next iCounter
End With
Grüße Karsten
Anzeige

33 Forumthreads zu ähnlichen Themen

Application.FileSearch weg?
Frank

Hallo Leute,
ich habe ein kleines Problem mit unten stehender Programmierung. Unter Excel 2003 lief das einwandfrei.
Nun habe ich Excel 2007 und jetzt hängt sich die Geschichte bei
"With Application.FileSearch" auf.
Offenbar gibt es dieses Filesearch nicht mehr.
Ich würde ab...
21.09.2008 16:21:54
Thread-ID: 1011315
5 Beiträge
Anzeige
Application.FileSearch geht nicht unter 2007
ray

Hallo,
mein folgender Code funktioniert nach der Umstellung auf E2007 nicht mehr, da da FileSearch nicht mehr unterstützt wird.
Kann mir jemand beim umbauen helfen, damit es unter 07 auch geht?
Sub objektanzeigen2() Application.ScreenUpdating = False Worksheets("outputFiles").Select...
10.11.2009 15:58:39
Thread-ID: 1115913
11 Beiträge
Application.FileSearch in Office 2007
Lars

Hallo zusammen,
haben soeben office 2007 installiert und nun läuft folgender code nicht mehr:
Dim fs As FileSearch
Dim iCounter As Integer
Dim sPath As String
sPath = "C:\Dokumente und Einstellungen\......." & UserForm3.ComboBox1 'ThisWorkbook.path
Set fs = Applicati...
23.12.2009 18:55:59
Thread-ID: 1125798
6 Beiträge
Anzeige
VBA - Application.FileSearch
markoju

Hallo an alle,
Der Benutzer Tino war so nett und hat mir vor einiger Zeit in unten angeführter Excel-Datei ein Script geschrieben, womit in einem Ordner alle Text-Dateien gelesen, automatisch bei Mausklick ins excel eingefügt werden und anschließend ein Diagramm erstellt wird.
https://w...
14.02.2011 13:42:27
Thread-ID: 1200680
4 Beiträge
Application.Filesearch - Ersatz
Rupert

Hallo liebe Forumgemeinde,
Ich hab folgende codes am laufen, diese habe ich mir Hilfe von diesem Forum erstellt, leider laufen die noch mit application.filesearch. Ich habe schon die diversen Ansätze gesehen von Hajo & Nepomuk, nur leider reicht mein VBA Wissen nicht soweit als das ich...
21.02.2011 10:08:23
Thread-ID: 1202000
12 Beiträge
Application.FileSearch
Reinhardt

Hallo,
ich habe einen für mich "kleinen Schatz" im Archiv gefunden, der aber leider bei mir eine Fehlermeldung erzeugt:
Objekt unterstützt diese Action nicht
With Application.FileSearch
Was kann ich machen?
Gruß Reinhardt.
Problem: In Spalte A sollen die Dateien aus dem...
30.04.2011 17:56:46
Thread-ID: 1212468
3 Beiträge
Hilfe: Application.Filesearch umschreiben
Pierre

Hallo nochmal!
Hatte eben schon mal einen Beitrag geschrieben, aber ich komme einfach nicht weiter. Das Makro aus 2003 funktioniert nicht im 2007, weil 2007 die "Application.FileSearch" nicht unterstützt.
Ich habe mir das angeschaut und schaffe es ehrlich gesagt nicht das Makro umzuschr...
11.07.2011 16:23:04
Thread-ID: 1221717
3 Beiträge
Application.filesearch
lb.unterfranke@googlemail.com

Guten Morgen zusammen,
in unserer Firma ist ein Umstieg von Office 2003 auf Office 2010 vorgesehen. Nun habe ich gehört, das einige Funktionen aus VBA 2003 in 2010 nicht mehr vorhanden sind, u.a. auch Application.FileSearch. Da bei uns einige Makros die Funktion erhalten, müssten diese umge...
14.10.2011 11:48:06
Thread-ID: 1233782
6 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
1
10
5
4
3
11
2
2
5
1
1
3
3
4
5
6
4
2
2
3
4
6
9
2