Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
408to412
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
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
suchen in versch. dateien
tim
tag leute
mir schwebt folgendes vor:
in eine zelle (A20) möchte ich einen suchwert eingeben. dieser wert soll dann in verschiedenen dateien (1.exe, 2.exe, 3.exe) gesucht werden.
wird er gefunden so soll die ganze zeile (spalten a bis m) der gefundenen werte in einer dialogbox angezeigt werden.
speziell: wenn es irgend geht, so sollten die dateien optisch nicht unbedingt geöffnet werden.
frage:
1. könnte man dies auch mit zwei werten machen? z.b. 'xxx' und 'yyy' und nur das ergebnis listen welches auf beide werte zutrifft?
2. geht das mit der eingabe in die Zelle A20 oder wäre es geschickter über eine userform?
vielen dank für die hilfe
grüsse tim

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: suchen in versch. dateien
Andreas
Hallo Tim,
hier im Forum stand mal eine Funktion zum Werteauslesen aus einer geschlossenen Datei, funktioniert mit "ExecuteExcel4Macro" und der Übergabe des entsprechenden Arguments, hier mal der Quelltext der Funktion:
Public

Function GetValue(path, file, sheet, ref)
'   Retrieves a value from a closed workbook
Dim arg As String
Dim Intermediate As Variant
'   Make sure the file exists
If Right(path, 1) <> "\" Then path = path & "\"
If Dir(path & file) = "" Then
GetValue = "File Not Found"
Exit Function
End If
'   Create the argument
arg = "'" & path & "[" & file & "]" & sheet & "'!" & _
Range(ref).Range("A1").Address(, , xlR1C1)
'   Execute an XLM macro
Intermediate = ExecuteExcel4Macro(arg)
GetValue = Format(Intermediate)
End Function

Meine Idee wäre nun, ausgehend von dieser Funktion, eine Schleife duchlaufen zu lassen, welche die Arbeitsblätter der geschlossenen Dateien durchläuft und die Werte ausliest, diese dann vergleicht mit dem Suchbegriff und so dann den Output generiert. Arbeiten mit geschlossenen Dateien ist allerdings ein wenig komplizierter als mit offenen Dateien, von daher wäre eine Alternative die Dateien zu laden, das ScreenUpdating auszuschalten und dann mit den im Hintergrund geöffneten Dateien zu arbeiten und die Suche entsprechend durchzuführen.
Was ich allerdings nicht ganz verstanden habe, ob du XLS-Dateien oder tatsächlich .EXE-Dateien durchsuchen willst, dann Binärdateien kann man meines Wissens nach nicht mit VBA durchsuchen geschweige dann im Binärcode öffnen ... Tippfehler?
Grüße
Andreas
Anzeige
AW: suchen in versch. dateien
03.04.2004 10:20:24
tim
hallo andreas
vielen dnak für deine antwort. ich werde es gleich versuchen.
natürlich sind .xls-dateien gemeint und nicht .exe, sorry
grüsse tim

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige