Gruss aus dem Hunsrück
Klaus-Martin
Öffne Excel und erstelle eine neue Arbeitsmappe oder öffne eine bestehende Datei.
Drücke ALT + F11, um die Entwicklungsumgebung (VBA-Editor) zu öffnen.
Doppelklicke auf "Diese Arbeitsmappe" im Projektfenster auf der linken Seite.
Füge folgenden Code ein:
Sub Suchen()
Dim Artikelcode As String
Dim ws As Worksheet
Dim Zelle As Range
Artikelcode = InputBox("Bitte Artikelcode eingeben:")
For Each ws In ThisWorkbook.Worksheets
Set Zelle = ws.Cells.Find(What:=Artikelcode, LookIn:=xlValues, LookAt:=xlWhole)
If Not Zelle Is Nothing Then
MsgBox "Artikelcode gefunden in: " & ws.Name & " Zelle: " & Zelle.Address
Exit Sub
End If
Next ws
MsgBox "Artikelcode nicht gefunden."
End SubSchließe den VBA-Editor.
Um das Makro auszuführen, drücke ALT + F8, wähle "Suchen" und klicke auf "Ausführen".
Optional: Um den Prozess zu vereinfachen, kannst Du eine Schaltfläche auf deinem Excel-Blatt erstellen, die das Makro ausführt.
Problem: Das Makro wird nicht ausgeführt.
Problem: Artikelcode wird nicht gefunden, obwohl er vorhanden ist.
Wenn Du kein Makro in Excel erstellen möchtest, kannst Du auch die integrierte Suchfunktion verwenden:
STRG + F, um das Suchfeld in Excel zu öffnen.Eine weitere Möglichkeit ist, ein Suchfeld in Excel einzufügen, um die Verwendung durch den Benutzer zu erleichtern. Dies kann durch ein Formularsteuerelement oder eine ActiveX-Steuerelement-Schaltfläche geschehen.
12345 in einer großen Datenliste.1. Wie kann ich ein Makro in Excel speichern?
Um ein Makro zu speichern, speichere die Arbeitsmappe im Format "Excel-Arbeitsmappe mit Makros" (*.xlsm).
2. Kann ich mehrere Artikelcodes gleichzeitig suchen?
Ja, Du kannst den Code anpassen, um eine Liste von Artikelcodes zu verarbeiten und die Ergebnisse für jeden Artikelcode anzuzeigen.
3. Wie erstelle ich ein Makro, das automatisch bei Öffnen der Datei ausgeführt wird?
Du kannst das Makro in das Ereignis "Workbook_Open" einfügen, sodass es automatisch beim Öffnen der Datei ausgeführt wird.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen