Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
728to732
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
728to732
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabelle mit mehteren Tabellenblättern durchsuchen

Tabelle mit mehteren Tabellenblättern durchsuchen
07.02.2006 10:35:30
Manfred
Hallo Forum,
ich habe mal eine Frage:
Meine Tablle besteht aus ca 70 Tabellenblättern.
Nun müste ich einen bestimmten Eintag in der Spalte B suchen weiß aber nicht in welchen Tabellenbltt er steht. Die Abfrage mittels Autofilter in jedem Tabellenblatt ist doch recht Mühselig. Besteht die Möglichkeit einen Eintrag über alle Tabellenblätter zu suchen ? Als Ausgabe sollte der Tabellenblattname ausgegeben werden oder auch der Inhalt der gesamten Zeile in welcher der Eintrag gefunden wurde.
Bin für jeden Tipp dankbar
Manfred

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

Betreff
Datum
Anwender
Anzeige
AW: Tabelle mit mehteren Tabellenblättern durchsuchen
07.02.2006 11:02:47
Harald
Hallo Manfred,
hier ein Beispiel aus der famosen Excel-CD von Herber
der Code gehört in ein Standardmodul.

Sub MultiSeek()
Dim wks As Worksheet
Dim rng As Range
Dim sAddress As String, sFind As String
sFind = InputBox("Bitte Suchbegriff eingeben:")
For Each wks In Worksheets
Set rng = wks.Cells.Find( _
what:=sFind, _
lookat:=xlWhole, _
LookIn:=xlFormulas)
If Not rng Is Nothing Then
sAddress = rng.Address
MsgBox "Der Suchbegriff steht in Blatt " & wks.Name & " " & rng.Address(0, 0)
Do
Application.Goto rng, True
If MsgBox( _
prompt:="Weiter", _
Buttons:=vbYesNo + vbQuestion _
) = vbNo Then Exit Sub
Set rng = Cells.FindNext(after:=ActiveCell)
If rng.Address = sAddress Then Exit Do
Loop
End If
Next wks
MsgBox prompt:="Keine neue Fundstelle!"
End Sub

Gruss Harald
Anzeige
AW: Tabelle mit mehteren Tabellenblättern durchsuchen
07.02.2006 11:32:00
Manfred
Hallo Harald,
vielen Dank das ist genau das was ich gesucht habe.
Kannst Du mir evt. noch sagen wie ich das makro in ein "Standartmodul" einfüge. Klingt vieleicht doof aber leider weiß ich nicht wie das geht.
Manfred
AW: Tabelle mit mehteren Tabellenblättern durchsuchen
07.02.2006 11:39:36
Harald
Hi,
kein Problem.
2 Möglichkeiten.
1. du hast in dieser Mappe bereits einen Code per Rekorder aufgezeichnet
Dann ist im vba-Editor (Alt + F11) bereits ein Standardmodul (Modul1) angelegt.
Doppelklick auf Modul1, den Code ins rechte Codefenster kopieren
2. die Mappe ist jungfäulich ;-))
Im vba-Editor. Einfügen / Modul und den Code ins rechte Codefenster kopieren
Soll der Code per Button starten, über Steuerelement Toolbox einen Button einfügen / Code anzeigen und
Call Multiseek
reinschreiben. fertich ;-))
Gruss Harald
Anzeige

302 Forumthreads zu ähnlichen Themen

Tabellenblätter miteinander verknüpfen
Ephraim

Guten Morgen,
leider schaff ich es nicht, zwei Tabellenblätter in einer Datei miteinander zu verknüpfen. Was in Tabellenblatt 1 steht soll auch automatisch in TB2 übertragen werden. Optimalerweise soll in TB 2 lediglich eine Spalte ausgefüllt werden. Der restliche Inhalt soll geschützt sein...
18.08.2008 07:19:00
Thread-ID: 1002497
4 Beiträge
Anzeige
Eingaben aus Tabellen mit Userform befüllen
Peter

Hallo wertes Forum
ich habe da mal wieder etwas und komme nicht so richtig weiter.
Ich habe eine Tabelle
In Spalten Namen und in Zeilen Datum
Nun möchte ich gern das ganze mit Userform befüllen
also eine combobox, die mir das Datum zurürck gibt und eine die Mir die Namen a...
06.09.2008 11:42:00
Thread-ID: 1007825
4 Beiträge
aut.Füllen von Felden mittels Referenztabellen
Felden

Hallo,
ich habe folgende Situation:
Ich habe zu einer Artikelnummer eine Kundenartikelnummer und einen Preis. Diese Daten habe ich in einer "Referenztabelle", d.h. in einem eigenen Excelfile.
Ich möchte nun bei der Erstellung von Rechnungen lediglich die Artikelnummer eingeben. Exce...
24.09.2008 08:04:00
Thread-ID: 1011910
2 Beiträge
Anzeige
Pivot-Tabellen mit gefilterten Werten möglich?
Andreas

Hallo Forum,
ich habe mal eine Frage bezüglich Pivot-Tabellen. Kann eine solche Tabelle schon vorher gefilterte Werte auswerten, ohne dass die herausgefilterten Zellen beachtet werden?
MFG Andreas
10.11.2008 11:29:00
Thread-ID: 1023155
5 Beiträge
Tabelle mittels eingebundenem Java jar-file füllen
Arthur

Ein fröhliches Hallo zusammen.
Ich habe ein Java jar-file, eingebunden in eine Excel-Datei. Die darin enthaltene Funktion soll per Knopfdruck aufgerufen werden, Daten aus einer anderen Anwendung abholen und das Ergebnis in einem Worksheet eintragen.
Der Knopfdruck samt Aufruf der Funkti...
27.11.2008 15:46:00
Thread-ID: 1028425
2 Beiträge
Tabellenbereich mit Array o.ä. füllen
dennis

Hallo zusammen,
weiss jemand eine Möglichkeit wie man mehrere Werte gleichzeitig in ein Exceltabellenblatt bekommt?
Mein Problem ist folgendes:
Ich berechne mir über eine Schleife die x,y Werte für ein Diagramm.
Diese würde ich gerne vorher speichern (z.B. in einem Array, bzw. M...
09.01.2009 15:02:04
Thread-ID: 1038249
10 Beiträge
Wie Säulendiagramm mit Tabelle mit gestapelten Säu
sohsoh

Hallo,
ich habe folgendes Problem und schon wie ein Irrer probiert, aber bis jetzt noch keine Lösung gefunden.
Ich habe zu Verschiedenen Stoffen jeweils 2 Messwerte in 3 Verschiedenen Zuständen. Jetzt möchte ich ein Säulendigramm erstellen in denen ich 3 Säulen (zu den drei Zuständen je...
14.01.2009 10:48:22
Thread-ID: 1039519
2 Beiträge
Die ersten 5 Zeilen als fester Block
Markus

Hallo
Noch eine letzte Frage:
Wenn ich in einem Sheet die ersten 5 Zeilen mit Beschriftung und Datum habe sprich eine Bilanz.
Wie kann ich das bewerkstelligen, wenn die Bilanz oder die GuV Rechnung sich auf zwei Seiten verlängert, daß ich die ersten 5 Zeilen auch auf der zweiten Sei...
31.01.2009 01:17:00
Thread-ID: 1045564
2 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
9
3
1
4
4
1
9
1
1
8
4
5
8
6
3
2
18
1
2
1
2
9
6
2