Office: (Office 365) Mehrere Tabellenblätter druchsuchen

Hi zusammen,

ich bin noch recht neu hier (mein erster Beitrag )

Ich habe bereits eine Suchfunktion für mein erstes Tabellenblatt.
Jetzt möchte ich eine weitere Suchfunktion erstellen, die mir alle anderen Tabellenblätter durchsucht. Das erste ist die Projektübersicht, dort ist der gesuchte Eintrag nicht auffindbar. Das zweite Tabellenblatt, auf dem der Suchbegriff nicht zu finden ist, ist ausgeblendet.

Hier mal meine Suchfunktion für das erste Tabellenblatt:

Private Sub TextBox1_Change()

With ufSearchProject.ListBox1

.Clear

For Project = 7 To Tabelle1.Cells(Rows.Count, 1).End(xlUp).Row

If InStr(1, LCase(Tabelle1.Cells(Project, 1).Value), LCase(ufSearchProject.TextBox1.Value)) <> 0 _
Or InStr(1, LCase(Tabelle1.Cells(Project, 2).Value), LCase(ufSearchProject.TextBox1.Value)) <> 0 _
Or InStr(1, LCase(Tabelle1.Cells(Project, 3).Value), LCase(ufSearchProject.TextBox1.Value)) <> 0 _
Or InStr(1, LCase(Tabelle1.Cells(Project, 4).Value), LCase(ufSearchProject.TextBox1.Value)) <> 0 Then

.AddItem Tabelle1.Cells(Project, 2).Value
.List(.ListCount - 1, 1) = Tabelle1.Cells(Project, 3).Value
.List(.ListCount - 1, 2) = Tabelle1.Cells(Project, 4).Value
.List(.ListCount - 1, 3) = Tabelle1.Cells(Project, 10).Row

End If

Next Project

End With

End Sub
​

Extra eingerückt.

Hier nochmal die Frage etwas direkter formuliert:
Wie müsste ich oben stehenden Code abändern, um alle Tabellenblätter (bis auf die Projektübersicht und das ausgeblendete Tabellenblatt [das ausgeblendete Tabellenblatt muss nicht zwingend ausgeschlossen werden]) zu durchsuchen?

Schon mal vielen lieben Dank im vorraus! :)

 

Hallo,

eine Beispieldatei hat viel mehr Aussagekraft als ein Quelltext. Zu deiner Frage: du musst eben in einer zweiten, übergeordneten Schleife nacheinander die gewünschten Tabellenblätter aufrufen. Abschließend der Hinweis, dass gleichartige Daten ohnehin auf ein Tabellenblatt gehören, das spart viele Klimmzüge.

 

Hallo Klaus-Dieter,

die Datei wurde soeben mit angefügt.

Die Daten müssen jedoch so erfasst werden, da es sich immer wieder um andere Projekte handelt.

Das mit dem nacheinander aufrufen gestaltet sich etwas schwierig. Da eben mit jedem neuen Projekt auch ein neues Tabellenblatt erstellt wird.

 

Hallo Arwulf,

du hattest von mehreren Tabellenblättern geschrieben. Außer dem Blatt Projektübersicht, habe ich nur eines gefunden, mit einer wilden Anordnung von formatierten Tabellen. Das kann nicht dein Ernst sein.

 

Das ist eine Beispieldatei ... wenn Du Dich davon verarscht fühlst tut es mir leid. Die Originaldatei kann ich aus Datenschutztechnischen Gründen nicht verwenden.

 

Hallo Arwulf,

ich habe nicht geschrieben, dass ich mich verarscht fühle, dann hätte ich auch ganz anders reagiert. Meine Frage zielte auf eine Beispieldatei, nicht auf das Original. Das könnte also eine verkleinerte Originaldatei mit wenigen anonymisierten Daten sein. Für Programmierarbeiten ist es unerlässlich zu wissen, wie die Originaldatei aufgebaut ist. Sonst arbeitet man für die Tonne, darauf habe ich keine Lust.

 

Hallo Klaus-Dieter,

nun dann habe ich Dich falsch verstanden.

Dann werde ich mal schauen, was ich da zusammenbekomme. Ich denke mal 5 weitere Tabellenblätter reichen?

 

Hallo Arwulf,

es reichen auch zwei bis drei.

 

Guten Abend,

ich hab dann mal ein paar Info's rein. Hoffe das ist nun eher nach deinem Geschmack

 

Hallo Arwulf,

du hast also tatsächlich eine Datei, die eine größere Anzahl Tabellenblätter enthält, auf denen es mehrere, unstrukturiert verteilte, formatierte Tabellen gibt? Dafür werde ich keinen Lösungsvorschlag erstellen.

 

Nun, in dem Fall hättest Du es direkt schreiben können. So hätten wir uns viel Zeit sparen können.
Auch finde ich es wirklich schade, dass Du mehr auf der Darstellung der Tabellenblätter rumreitest, anstatt mal etwas konstruktives zu äußern.

In diesem Sinne, Adieu!

 

Geht nicht um die Darstellung geht um die Datenstruktur .. mensch kann die so bauen das es einfach wird Abfragen zu erstellen oder mensch hält an seinen mitgebrachten Vorstellungen fest und verlängert das Leiden.

Pan

 

Hallo Arwulf,

offenbar hat Pan mein Anliegen besser verstanden als du. Du hast das Tabellenblatt Projektübersicht, dorthin holst du Daten aus mehreren Blättern, (offenbar gibt es pro Projekt eines). Warum trägst du in diesen Blättern Daten ein, die dann dann per Formel in das Blatt Projektplan überführst? Die könnte man zum Beispiel dort direkt eintragen.

 

Nun, das Problem an der Sache ist, dass eben für jedes Projekt wieder andere Daten erfasst werden müssen. Somit vergrößert sich die Menge der Tabellenblätter mit den einzeln Projekt. Und da es eben einfacher ist, die wichtigsten Daten aus den Tabellenblättern per Formel auf die Projektübersicht zu übertragen. Da mein Chef eben das Motto, Zeit ist Geld, sehr genau lebt.

Ich lass mich auch gerne auf andere Programmiervorschläge ein. Allerdings kann ich an der Struktur der Datei nichts ändern.

Im Grunde brauche ich nur die Möglichkeit meine bisherige Suchfunktion auf die Tabellenblätter zu erweitern.

 

Hallo Arwulf,

genau dieser Aussage widerspreche ich. Ziel muss es sein, komplizierte Dinge einfach darzustellen, nicht umgedreht. Du versuchst hier so viele verschiedene Dinge unter einen Hut zu bringen, dass sich für mich die Frage stellt, ob das Projekt in Access nicht besser aufgehoben wäre.