Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1340to1344
1340to1344
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

With Application.FileSearch

Forumthread: With Application.FileSearch

With Application.FileSearch
11.12.2013 11:02:13
Manfred
Hallo Excelfreunde,
ich habe große Schwierigkeiten folgendes Makro an Office 2007 anzupassen. Ist jemand von EUch in der Lage, dies für mich zu tun. Meine Recherchen bringen mich nicht wirklich weiter damit.
Sub DruckvorlagenSuchen()
Verzeichnis = Cells(100, 1)
Sheets("Tabelle1").ComboBox1 = ""
Sheets("Tabelle1").ComboBox1.Clear
Dim gefunden
With Application.FileSearch
.NewSearch
.LookIn = Verzeichnis & "druckvorlagen"
.Filename = variante & "*" & Drucker0
.Execute
For Each gefunden In .FoundFiles
Sheets("Tabelle1").ComboBox1.AddItem Dir(gefunden)
Next
End With
End Sub

Gruß Manfred

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Recherche: FileSearch+Xl12
11.12.2013 12:11:49
Luc:-?
Hallo, Manfred;
im Archiv und auch in anderen Xl-Foren bzw -Tutorien (zB auch Online-Excel ) und privaten XlSites gibt's schon lange Ersatz dafür.
Gruß Luc :-?

AW: weniger hilfreich, eher verwirrend
11.12.2013 12:35:33
Manfred
Hallo Luc,
wenn da davon etwas versteht, kommt man bestimmt damit klar.
Ich benötige Hilfe, keine weitere Verwirrung.
Gruß Manfred

Anzeige
Soso, ein Recherche-Tipp verwirrt dich also! :->
12.12.2013 00:14:41
Luc:-?
Luc :-?

AW: With Application.FileSearch
11.12.2013 12:55:59
Rudi
Hallo,
geraten so: 
Sub DruckvorlagenSuchen()
Dim gefunden
Verzeichnis = Cells(100, 1)
Sheets("Tabelle1").ComboBox1 = ""
Sheets("Tabelle1").ComboBox1.Clear
gefunden = Dir(Verzeichnis & "druckvorlagen\" & variante & "*" & Drucker0)
Do While gefunden  ""
Sheets("Tabelle1").ComboBox1.AddItem gefunden
gefunden = Dir
Loop
End Sub

Gruß
Rudi

Anzeige
AW: With Application.FileSearch
11.12.2013 13:01:23
Manfred
Hallo Rudi,
sehr gut, es funktioniert.
Vielen Vielen Dank
Gruß Manfred
;

Forumthreads zu verwandten 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
Application.Filesearch
Rupert

Hallo Forum,
Ich habe da wieder mal ein Problem, aufgrund der Zeilenanzahl, werden wir in den nächsten Tagen von Excel 2003 auf Excel 2007 umsteigen, jetzt hab ich schon gelesen, das Application.Filesearch nicht mehr vorhanden ist in Excel 2007, muss aber ehrlich gestehen, das ich mir bei d...
21.10.2008 10:23:33
Thread-ID: 1017886
2 Beiträge
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
Anzeige
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
Alle Ordner auflisten ohne Application.FileSearch?
Kasimir

Hallo an alle Helfenden!
Ich benötige Eure Hilfe. Ich suche ein Makro, das mir alle Ordner und auch deren Unterordner eines bestimmten Pfades auflistet. Allerdings muss das Makro in allen Excelversionen ab Excel 2000 laufen. Somit scheidet leider die Funktion „Application.FileSearch“ aus, d...
28.06.2010 19:05:19
Thread-ID: 1164403
5 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
Anzeige
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
Problem mit Application.FileSearch
Michael

Hallo Excel Profis,
ich brauche dringend eure hilfe, nach der umstellung von 2003 auf 2010, funktionierten ein Makro nicht mehr.
Hab zwar jetzt schon heraus gefunden das es am "Application.FileSearch" liegt aber nicht wie ich denn fehler weg bekommen. Das Simulieren von der Anwendung "A...
11.11.2011 12:52:27
Thread-ID: 1237474
2 Beiträge
Application.FileSearch
Laund

Hallo Profis
Wir haben heute das neue Excel Version 14.0 installiert
Application.FileSearch gibt es nach google-suche nicht mehr
und mit den Alternativen komme ich irgendwie nicht zurecht
Mein bisheriger Code war:
Set fs = Application.FileSearch With fs .SearchSubFolders...
22.12.2011 16:46:00
Thread-ID: 1243294
2 Beiträge

Beliebteste Forumthreads (12 Monate)

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