Ich habe eine Excel-Tabelle abgespeichert...?

Wie aus den bisherigen Antworten unschwer zu erkennen ist, hat keiner wirklich verstanden, was Du wolltest. Aus Deinen Angaben lässt sich vermuten, dass Du jede Woche eine neue Datei anlegst und Du nun das Problem hast, bei der Suche nach der Artikelnummer festzustellen in welcher Datei sie auftaucht.

Dieses Problem ließe sich ganz leicht dadurch umgehen, indem Du alle Eintragungen in einem Arbeitsblatt vornimmst, wobei Du hinter der Spalte „Artikelnummer“ eine Spalte „Datum“ einrichten solltest. Immer wenn Du einen neuen Eintrag vornimmst, trägst Du das aktuelle (heutige) Datum dort ein. Das geht ganz einfach über Strg/Ctrl und Punkt.

Wenn Du dann über die Suchfunktion (Strg/Ctrl und f) die Artikelnummer eingibst und „alle suchen“ anklickst wirst Du ohne große Umstände fündig werden.

Nachtrag:

Jetzt wollen wir mal Ordnung in den Laden bringen.

1. In Deinem Ordner mit Deinen Artikelnummern legst Du eine Arbeitsmappe an und benennst die KW (Kalenderwoche).

2. in die Zelle Z1S1 (A1) trägst Du 1/1/11 ein (ergibt 01.01.2011)

3. mit der linken Maustaste anklicken, mit dem Kreuz auf die rechte untere Ecke der Zelle gehen, festhalten und nach unten bis Zeile 365 (nächstes Jahr 366) ziehen. Jetzt hast Du das komplette Jahr 2011 da stehen.

4. In die Zelle Z1S2 (B1) kommt folgende Formel: =WOCHENTAG(ZS(-1);2) und die kopierst Du gleich noch in die Zelle darunter. Mit dieser Formel wird dem Datum der jeweilige Wochentag zugeordnet, wobei die Woche mit dem Montag = 1 beginnt.

5. In die Zelle Z1S3 (C1) gibst Du eine 1 ein, weil es ja die erste Woche des Jahres ist.

6. In die Zelle Z2S3 (C2) kommt folgende Formel: =WENN(ZS(-1)=1;Z(-1)+1;Z(-1)S) Damit passiert folgendes. Es wird solange die Zahl darüber eingetragen, bis links eine 1 auftaucht, was Montag bedeutet und damit den Beginn einer neuen Woche und da wird dann zu der Zahl darüber eins addiert.

7. Die Zellen Z2S2 und S3 (B2 und C2) markieren, kopieren und bis unten (31.12.2011) einfügen

8. Jetzt den kompletten Bereich markieren und dann alt + e/n/d/kw/return oder anders ausgedrückt: Einfügen/Namen/Definieren/kw/OK

Jetzt widmen wir uns mal Deinen Arbeitsmappen, die Du alle in einer Mappe zusammenfassen musst.

1. Hinter die Spalte mit den Artikelnummern fügst Du zwei Spalten ein. Die erste ist „Datum“ und die zweite „KW“ (Kalenderwoche).

2. In die erste Zeile mit Artikelnummer kommt in die Spalte KW folgende Formel: =SVERWEIS(ZS(-1);KW!Z(-1)S(-2):Z(31)S;3;FALSCH) , die Du bis nach ganz unten kopierst. Jetzt passiert folgendes: das Datum links wird in der Matrix KW (in dem Arbeitsblatt KW) gesucht und dann die danebenstehende Zahl der Kalenderwoche übernommen.

So und nun die große Frage, was bringt mir das? Ganz einfach, jetzt kannst Du mit Hilfe des Autofilters alles in Sekundenschnelle abfragen. Dazu zunächst alt + n/f/f/ oder Daten/Filter/Autofilter. Jetzt erscheinen in der Zeile 1 neben jeder Überschrift eine Befehlsfläche mit einem Pfeil nach unten. Wenn Du jetzt zum Beispiel bei der Artikelnummer anklickst, erscheinen alle numerisch geordnet. Die gewünschte raussuchen und Deine komplette Datei reduziert sich auf alle Einträge dieser Nummer mit der jeweiligen Kalenderwoche dahinter. Natürlich ist auch eine Selektion über die Suchfunktion (Strg/Ctrl und f) möglich. Wenn dann „alle suchen“ angeklickt werden, erhält man auch einen entsprechenden Überblick.

Unnötig zu sagen, dass man mit der Filterfunktion natürlich alle Artikelnummern an einem bestimmten Tag oder einer KW nachsehen kann.

Probier das Ganze erst mal mit Deinen kopierten Daten aus, bevor Du ans Eingemachte gehst, damit Du erst mal einen Überblick bekommst, wie was funktioniert.

So und nun viel Spaß.

Hier mal eine Makrolösung, die alle Tabellen nach einen String in Spalte B absucht, den du in eine Textbox eingeben kannst. Wenn die "Nummer" gefunden wurde, steigt das Makro aus und eine Textbox zeigt Tabelle und Adresse der Fundstelle, So werden allerdings keine Doppelten Nummern gefunden!

Eis würde jetzt zu weit führen, zu erklären wie man das einbaut und startet, dazu gibt es zhlreiche Einsteiger Tuts im Netz (Google)

'##### Code

'Einfügen in eine neues Modul (rechtsklick auf das Projekt > Einfügen > Neues Modul) des VBA Projekts (am besten in Excel die Entwicklertools aktivieren)

Sub WS_COUNT_SUCHE()

Dim wsSheet As Worksheet

Dim myrange As Range

Dim lastcell As Long

Dim mystr, findstr As String

Dim Mldg, Titel, Voreinstellung, Wert1

Mldg = "Bitte einen Suchbegriff mit mindestens 3 Zeichen eingeben" ' Aufforderung festlegen.

Titel = "Suche" ' Titel festlegen.

'Voreinstellung = "*" & "." & "*" ' Voreinstellung festlegen.

Voreinstellung = "" ' Voreinstellung festlegen.

' Meldung, Titel und Standardwert anzeigen.

mystr = InputBox(Mldg, Titel, Voreinstellung)

'mystr = "123"

'Schleife Tabellen

For Each wsSheet In ThisWorkbook.Worksheets

wsSheet.Activate

With wsSheet

'letzte belgte Zeile in Spalte B (cells(, x. 2)finden

lastcell = .Cells(Rows.Count, 2).End(xlUp).Row

'Schleife für ranges in Tabellen

For Each myrange In .Range("B1:B" & lastcell)

findstr = Cells(lastcell, 2).Value

If InStr(findstr, mystr) Then

MsgBox (mystr & " gefunden in " & wsSheet.Name & " " & Cells(lastcell, 2).Address)

' Beenden wenn gefunden

Exit Sub

End If

Next myrange

End With

Next wsSheet

End Sub

'##### Code

Sehe mal zu, dass alle Tabellen in einer Arbeitsmappe sind. Dann läßt sich die Sucherei über Excel elbst erledigen. Im Menüpunkt Suchen/Ersetzen Unterpunkt Suchen läßt sich einstellen wo was gesucht wird. Arbeitsblatt oder Mappe. Wird nur ein Arbeitsblatt verwendet, dann die oberste Zeile eintsprechend einrichten. Sagen wir mal:

Spalte 1: Datum

Spalte 2: Woche

Spalte 3: Text

Diese Zeile markieren und im Menü Daten den Autofilter starten. Office 10 bei Daten und Filtern.

Das sollte erst einmal genügen um was zu finden.

Will man alles auf ein Blatt haben, dann das erste Blatt aufsuchen und in den unteren Zeilen das Gleichzeichen eingeben und dann das nächste Blatt aufsuchen und in die erste Zelle der Datensammlung klicken. Auf Blatt eins sind dann die Zellen verbunden. Nächste Spalte, selbe Zelle und nochmal. Danach nachsehen wieviele Zeilen zu übernehmen sind und nach untenausfüllen. Fertig und zur nächsten Tabelle.

Das geht nur, wenn sämtliche Daten in der selben Tabelle oder in einer Excel-Arbeitsmappe gespeichert sind.

Du kannst aber auch ein Makro schreiben, das nacheinander alle einzelnen Tabellen öffnet und darin sucht - das dauert aber ewig und du musst dir zuvor ein eindeutiges und dynamisches Verfahren ausdenken, nach dem du die einzelnen Tabellen benennst; du willst ja nicht jedesmal das Makro ändern, wenn du eine neue Artikel-/Nummer-Datei anlegst ...

Sind alle Tabellen in einer Datei? Falls ja - dann kannst Du danach suchen. Ansonsten müsstest Du die Suchfunktion im Explorer nutzen - und der sucht sich tot!

Wenn sie sich das ganze einfacher machen wollen, dann übertragen sie ihre Tabellen auf Access, da sie dort einfach Suchen und Hinzufügen können. Sie müssen nur einmal die Einstellungen treffen und können dann immer sehr einfach über s.g. Formulare agieren und ersparen sich die Sucharbeit!