Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Problem mit Application Filesearch?

Forumthread: Problem mit Application Filesearch?

Problem mit Application Filesearch?
18.11.2008 08:00:43
Jessi
Hallo zusammen,
ich bekomme immer eine Fehlermeldung bei folgender Application...
Muss ich da was einstellen?
Userbild
LG
Jessi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Problem mit Application Filesearch?
18.11.2008 08:09:00
Hajo_Zi
Hallo Jesssi,
die Funktion gibt es unter 20078 nicht.
http://hajo-excel.de/2007_hinweise.htm

Anzeige
DANKE!!!
18.11.2008 08:21:24
Jessi
hallo ihr beiden
na zum glück gibt's die funktion nicht mehr bei 2007. Das tool von hajo_zi ist absolut SUPER für meine arbeit, wäre ich ansonsten nicht draufgestoßen worden...:-)
DANKE!!!
AW: Problem mit Application Filesearch?
18.11.2008 08:23:59
Tino
Hallo,
hier eine alternative um in einen Ordner nach Dateien zu suchen.
Sub SucheDatei()
Dim Fso, Ordner, varDatei
Dim DateiName As String
Dim SucheDatei As String

SucheDatei = ".xls"
'ab welcher Zeile einfügen 
Set Fso = CreateObject("Scripting.FileSystemObject")
'hier Pfad angeben 
Set Ordner = Fso.getfolder("J:\1 Forum")

'Schleife über alle Dateien im Ordner 
For Each varDatei In Ordner.Files
  'Dateifilter, Platzhalter verwenden 
 If varDatei Like "*" & SucheDatei & "*" Then
    Debug.Print varDatei  '= Dateipfad + Dateiname 
 End If
Next varDatei

End Sub


Gruß Tino

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige