Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Suchen von Daten in mehreren Excel-Tabellen

Suchen von Daten in mehreren Excel-Tabellen
05.11.2018 17:13:49
Daten
Hallo zusammen,
ich habe in einem Verzeichnis Excel-Dateien mit mehren Daten(Text)als Inhalt.
Die Excel-Dateien können auch mehrere Tabellenblätter enthalten.
Nun möchte ich über eine Suchfunktion nach einem Begriff in diesen geschlossenen Excel-Dateien innerhalb eines definierten Zellenbereiches (bei allen Excel-Dateien gleich)suchen. Ein gleicher Begriff kann in mehreren Excel-Dateien vorkommen.
Deshalb soll nach der Eingabe des Suchbegriffes eine Auswahlliste mit den Dateinamen, möglichst ohne Endung erscheinen.
In der Auswahlliste kann nun entsprechend ein Dateiname angewählt werden und die entsprechende Excel-Datei öffnet sich.
Hat jemand dies schon mal in ähnlicher Weise umgesetzt und könnte mich dabei unterstützen.
Meine VBA-Kenntnisse sind leider noch sehr ausbaufähig.
Danke + Gruss
Reinhard
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchen von Daten in mehreren Excel-Tabellen
05.11.2018 18:30:03
Daten
Hallo
am besten bitte eine Beispieldatei hochladen, die Aufgabe ist so zu allgemein! Es fehlen alle Angaben zu den Datei- und Tabellen Namen, in wieviel Tabellen gesucht werden muss, Spalten und Zeilenangaben. Ohne dies wichtigsten Infos ist das nicht lösbar.
mfg Piet
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Daten in mehreren Excel-Tabellen suchen


Schritt-für-Schritt-Anleitung

Um in mehreren Excel-Dateien nach Inhalten zu suchen und eine Auswahlliste mit Dateinamen zu erstellen, kannst Du den folgenden VBA-Code verwenden. Dieser Code durchsucht alle Excel-Dateien in einem bestimmten Verzeichnis und gibt die entsprechenden Dateinamen zurück.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  3. Kopiere und füge den folgenden Code in das Modul ein:

    Sub SucheInExcelDateien()
       Dim fso As Object
       Dim folder As Object
       Dim file As Object
       Dim wb As Workbook
       Dim ws As Worksheet
       Dim cell As Range
       Dim suchbegriff As String
       Dim dateiliste As String
       Dim zellenbereich As String
    
       ' Verzeichnis anpassen
       Dim verzeichnis As String
       verzeichnis = "C:\Dein\Pfad\Zu\ExcelDateien\"
    
       ' Suchbegriff eingeben
       suchbegriff = InputBox("Gib den Suchbegriff ein:")
       zellenbereich = "A1:B10" ' Definiere den Zellenbereich
    
       Set fso = CreateObject("Scripting.FileSystemObject")
       Set folder = fso.GetFolder(verzeichnis)
    
       For Each file In folder.Files
           If Right(file.Name, 5) = ".xlsx" Then
               Set wb = Workbooks.Open(file.Path, ReadOnly:=True)
               For Each ws In wb.Worksheets
                   For Each cell In ws.Range(zellenbereich)
                       If InStr(1, cell.Value, suchbegriff, vbTextCompare) > 0 Then
                           dateiliste = dateiliste & vbCrLf & wb.Name
                           Exit For
                       End If
                   Next cell
               Next ws
               wb.Close False
           End If
       Next file
    
       If dateiliste = "" Then
           MsgBox "Kein Ergebnis gefunden."
       Else
           MsgBox "Gefundene Dateien:" & dateiliste
       End If
    End Sub
  4. Passe den verzeichnis-Pfad und den zellenbereich entsprechend Deinen Anforderungen an.

  5. Führe das Skript aus, indem Du F5 drückst oder das Makro über das Excel-Menü startest.


Häufige Fehler und Lösungen

  • Fehler: "Datei konnte nicht gefunden werden."

    • Stelle sicher, dass der angegebene Verzeichnis-Pfad korrekt ist.
  • Fehler: "Kein Ergebnis gefunden."

    • Überprüfe, ob der Suchbegriff tatsächlich in den definierten Zellenbereichen vorhanden ist.
  • Excel-Dateien öffnen sich nicht.

    • Achte darauf, dass die Dateien nicht schreibgeschützt sind und dass Du die Berechtigungen hast, auf die Dateien zuzugreifen.

Alternative Methoden

Wenn Du keine VBA nutzen möchtest, kannst Du auch die Funktion SVERWEIS in Kombination mit INDIREKT verwenden, um Daten aus mehreren Tabellenblättern zu durchsuchen. Dies ist jedoch auf eine bestimmte Anzahl von Blättern und eine manuelle Eingabe der Blätter beschränkt.


Praktische Beispiele

Angenommen, Du hast mehrere Excel-Dateien im Verzeichnis C:\Daten\ und suchst nach dem Begriff "Umsatz". Der oben beschriebene Code wird alle Excel-Dateien in diesem Verzeichnis durchsuchen und Dir alle Dateien auflisten, die den Begriff enthalten.


Tipps für Profis

  • Überlege, eine Pivot-Tabelle aus den gesammelten Daten zu erstellen, indem Du die relevanten Informationen aus den verschiedenen Excel-Dateien in eine Master-Datei zusammenführst. So kannst Du die Daten noch effektiver analysieren.
  • Nutze die Filter-Funktion in Excel, um die Suche zu verfeinern und gezielte Ergebnisse zu erhalten.

FAQ: Häufige Fragen

1. Kann ich auch nach mehreren Begriffen gleichzeitig suchen? Ja, Du kannst den Code anpassen, um eine Liste von Suchbegriffen zu akzeptieren und diese in einer Schleife abzuarbeiten.

2. Funktioniert dieser Code auch mit älteren Excel-Versionen? Ja, der Code sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen.

3. Wie kann ich die Suche auf bestimmte Tabellenblätter beschränken? Du kannst den Code anpassen, indem Du die If-Bedingung für den Arbeitsblattnamen hinzufügst, um nur spezifische Blätter zu durchsuchen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige