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

Datei aus Teilstring suchen und auslesen

Forumthread: Datei aus Teilstring suchen und auslesen

Datei aus Teilstring suchen und auslesen
sven
Hi,
habe ein Problem. Und zwar liegen txt Dateien vor, die ich einlesen will.
Die txt Dateinamen sind immer so aufgebaut: AZ0292_QKO38_110823_085031
AZ0292 ist ein User welcher wechseln könnte, QKO38 ist fest, 110823 steht für 23.08.11 und 085031 könnte sich auch ändern.
Wäre es möglich wenn ich in Zelle A1 23.08.11 eingebe, die Txt einzulesen.
Ich stelle mir dass so vor, das Excel dann nach ?_QKO38_110823_? sucht.
Wie stelle ich sowas an?
Gruß
Sven
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datei aus Teilstring suchen und auslesen
31.08.2011 09:41:32
Marc
Moin!
Versuch das mal:
ersetzte aber die Punkte noch mit dem aktuellen zu durchsuchenden Ordner
Gruß,Marc

Sub test()
ordner = "C:\Documents and Settings\...."
Set fs = Application.FileSearch
Range("A:B").ClearContents
With fs
.LookIn = ordner 'Ordner angeben
Datum = Year([a1]) & Format(Month([a1]), "00") & Format(Day([a1]), "00")
.Filename = "*_QK038_" & Datum & "_*.txt"
If .Execute(SortBy:=msoSortByFileName, _
SortOrder:=msoSortOrderAscending) > 0 Then
For i = 1 To .FoundFiles.Count
alt = .FoundFiles(i)
datnr = FreeFile
Open .FoundFiles(i) For Input As #datnr
zei = 1
Input #datnr, Satz 'Überschrift
Cells(zei, 1) = Satz
While Not EOF(datnr)
Input #datnr, Satz
If InStr(Satz, Wort1) > 0 And InStr(Satz, Wort2) > 0 Then
zei = zei + 1
Cells(zei, 1) = Satz
End If
Wend
Next i
Else
MsgBox "Keine Dateien gefunden," & vbCrLf & _
"Ordner überprüfen" & vbCrLf & vbCrLf & ordner
End If
End With
End Sub

Anzeige
AW: Datei aus Teilstring suchen und auslesen
31.08.2011 10:39:52
sven
Hi,
Problem ist, dass ich Excel2010 benutze und Application.FileSearch nicht mehr unterstützt wird...

Forumthreads zu verwandten Themen

Datei in allen Verzeichnisen und Odnern suchen
René

Hallo liebe Experten,
ich benötige ein Macro für eine Schaltfläche.
Es soll eine bestimmte Excel Datei in allen Verzeichnisen C:\ D:\ E:\ usw - und Ordnern des Rechners gesucht werden und diese dann per Klick geöffnet werden.
Kann mir bitte jemand helfen ?
Es grüßt Euch freund...
21.08.2008 21:14:00
Thread-ID: 1003638
6 Beiträge
Anzeige
Dateien suchen, Werte in Zieldatei übertragen
Julia

Hallo liebes Forum,
Ich habe folgende Bitte an Euch:
Habe folgende Aufgabe: Die Verzeichnistruktur sieht bei mir folgendermaßen aus:
"I:\Analysen\Aktiva\", danach folgen die Unterordner für verschiedene Länder und Jahre. Habe die Excel-Datei angehängt, wo die Verzeichnisstruktur als...
03.11.2008 12:37:07
Thread-ID: 1021301
2 Beiträge
Datei suchen = Zellinhalt gleich Dateiname
Bernd

Guten Morgen liebe EXCEL-User
Ich habe folgendes Problem: Zum kopieren von Daten zwischen 2 Dateien definiere ich in der Startdatei den Namen der zu öffnenden Datei (dieser ändert sich nach dem abschließenden Speichern der Startdatei!). Wenn diese im angegebenen Zielverzeichnis vorhanden is...
07.11.2008 10:15:00
Thread-ID: 1022558
2 Beiträge
Anzeige
Einzelnes Tabellnblatt in PDF Datei speichern
Jens

Ich habe folgendes Problem, ich möchte ein einzelnes Tabellenblatt aus Excel heraus in eine Pdf Datei mittels command Buttom und Makro/ VBA speichern. Als PDF Prog nutze ich Adobe Acrobat Prof 8.0(bringt nen Converter mit).
THX im Voraus
27.02.2009 15:30:50
Thread-ID: 1054824
14 Beiträge
xls Datei in Unterordnern suchen und öffnen
Markus

Hallo zusammen,
ich habe ein kleines Makro geschrieben, was mir eine Excel-Datei in einem Ordner suchen soll und diese dann öffnet. Das funktioniert auch soweit. Jetzt möchte ich aber die Unterordner, die sich in diesem Ordner befinden, einbinden. Leider bekomm ich es nicht hin.
Hier m...
28.04.2009 15:55:22
Thread-ID: 1071656
5 Beiträge
Excel Worksheet in PDF Datei umwandeln
Benedikt

hallo excel spezialisten
ich möchte gerne ein excel worksheet in eine pdf datei umwandeln, wie kann ich das machen?
das ganze sollte über einen makro möglich sein, denn ich möchte einen button dafür einsetzen (CommandButton1_Click), gleichzeitig möchte ich das sich die pdf datei automat...
28.02.2010 22:11:37
Thread-ID: 1142230
2 Beiträge
Einbetten einer pdf-Datei
Paul

Hallo,
ich möchte z.B. eine pdf-Datei in ein Excelblatt einbetten. Die pdf-Datei soll erst klein erscheinen und beim darauf klichen zu voller Größe auflaufen.
Gibt es da eine Möglichkeit?
Vielen Dank für eure Unterstützung
Gruß
Paul
14.04.2010 22:34:08
Thread-ID: 1151838
5 Beiträge
Zellinhalt in geschlossen Dateien suchen..
Uwe

Guten Tag an Alle,
ist folgendes möglich?
wenn ich z.b. in Zelle A1 als Beispiel "ABC123" eingebe und auf enter drücke, dass dann in
C:Testordner mit jede Menge Unterordner die dann Paul;Hans;Klaus u.s.w. heißen in den geschlossenen Dateien geschaut wird ob das selbe auch in Zelle A...
06.08.2010 12:27:07
Thread-ID: 1170893
16 Beiträge
Anzeige
Zeichenkette in Textdatei suchen & ersetzen
CaseII

Hallo Leute,
habe hier folgenden Code gefunden jedoch müsste es abgeändert werden damit der Text in B2 auch bei Leer- oder Sonderzeichen die Zeichenfolge ersetzt. Wenn z.B. nur Marker15 in B2 steht schreibt das Makro die neue Zeichenfolge in B3 immer wieder dazu und löscht es nicht.
In...
07.03.2011 07:27:57
Thread-ID: 1204528
10 Beiträge
Datei in einem unbest. Verzeich. suchen und öffnen
Pat Beach

Hallo zusammen
Ich möchte eine Excel Datei in einem bestimmten Laufwerk, aber unbestimmten Verzeichnis suchen und öffnen.Ich habe bereits verschiedene Makro-Codes ausprobiert, aber da ich noch in der Anfangsphase stecke, habe ich's nicht geschaft.WER KANN MIR HELFEN?Besten Dank.
Pat Beach...
13.05.2002 14:21:14
Thread-ID: 120470
12 Beiträge
Verzeichnis + Dateien nach Zellinhalt durchsuchen
Patrick

Hallo,
ich benötige bitte eure Hilfe.
Folgendes Problem treibt mich um:
Ich möchte ein festes Verzeichnis (c:\test - enthält nur xls.-Dateien) durchsuchen.
Und zwar möchte ich das bei allen enthaltenen Dateien überprüft wird, ob auf dem
Worksheet "Daten" in der Zelle G6 "DE"...
10.05.2011 14:57:44
Thread-ID: 1213837
4 Beiträge
Anzeige
Dateipfad eingeben und nach Werten druchsuchen
Jens

Hallo Forumsteilnehmer,
ich habe ein problem welches ich mit meinen unzureichenden Kenntnissen leider nicht alleine lösen kann.
Ich soll in einer Arbeitsmappe (z.B Mappe1 / Sheet1) einen Dateipfad für eine andere Mappe (z.B. Mappe2) angeben und per Knopfdruck nach dieser suchen lassen.<...
16.12.2011 08:45:41
Thread-ID: 1242216
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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