hallo, kann mir evtl. jm. helfen?
meine excel kenntnisse sind nicht hervorragend…
ich habe vor in einer excel tabelle inhalte zu suchen via suchmaske. wenn er diesen inhalt in einer spalte findet soll in der suchmaske der inhalt auftauchen. wenn er einen begriff in einer spalte öfter findet soll er mir alle nacheinander anzeigen und danach die suche beenden.
danke
Spalte markieren, strg-F eingeben, Gesuchtes eingeben…
MfG
das ganze soll als programm funktionieren.
(in einer do/if schleife)
Spalte markieren, strg-F eingeben, Gesuchtes eingeben…
MfG
- Strg + F
- „Weitersuchen“
LG OVM
Wir helfen gerne mit Fragen, schreiben aber keine Anwendungen hier…
Da kann ich dir leider nicht weiterhelfen. Sorry
MFG
Hallo,
schau mal in die VBA Hilfe:
Find (Methode)
Siehe auchBetrifftBeispielBesonderheitenFind-Methode, wie sie auf das WorksheetFunction-Objekt angewendet wird.
Sucht bestimmte Informationen in einem Arbeitsblatt.
Ausdruck.Find(Arg1, Arg2, Arg3)
Ausdruck Erforderlich. Ein Ausdruck, der ein WorksheetFunction-Objekt zurückgibt.
Arg1 String erforderlich. Der Name des Arbeitsblattes.
Arg2 String erforderlich. Der Name des Bereichs.
Arg3 Optionaler Variant-Wert. Der Name eines Arguments, um die Suche einzugrenzen.
Find-Methode, wie sie auf das Range-Objekt angewendet wird.
Sucht bestimmte Informationen in einem Bereich und gibt ein Range-Objekt zurück, das die erste Zelle mit diesem Inhalt darstellt. Gibt Nothing zurück, wenn keine Übereinstimmung gefunden wird. Die Methode bleibt ohne Wirkung auf die aktuelle Markierung oder die aktive Zelle.
Informationen über die Verwendung der Tabellenfunktion Finden in Visual Basic finden Sie unter Verwenden von Tabellenfunktionen in Visual Basic.
Ausdruck.Find(What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, MatchByte, SearchFormat)
Ausdruck Erforderlich. Ein Ausdruck, der ein Range-Objekt zurückgibt.
What Variant erforderlich. Der Inhalt, nach dem gesucht werden soll. Dabei kann es sich um eine Zeichenfolge oder einen beliebigen Microsoft Excel-Datentyp handeln.
After Optionaler Variant-Wert. Gibt die Zelle an, nach der die Suche beginnen soll. Dies entspricht der Position der aktiven Zelle, wenn eine Suche von der Benutzeroberfläche aus durchgeführt wird. Bitte beachten Sie, dass After eine einzelne Zelle im Bereich sein muss. Beachten Sie, dass die Suche nach dieser Zelle beginnt, die angegebene Zelle wird also erst durchsucht, wenn der Suchlauf zur Ausgangszelle zurückkehrt. Wird das Argument nicht angegeben, so ist die obere linke Zelle des Bereichs der Startpunkt für die Suche.
LookIn Optionaler Variant-Wert. Der Typ der Informationen.
LookAt Optional Variant. Kann eine der folgenden XlLookAt-Konstanten sein: xlWhole or xlPart.
SearchOrder Optional Variant. Kann eine der folgenden XlSearchOrder-Konstanten sein: xlByRows or xlByColumns.
SearchDirection Optionaler XlSearchDirection-Wert. Die Suchrichtung.
XlSearchDirection kann eine der folgenden XlSearchDirection-Konstanten sein.
xlNext Standard
xlPrevious
MatchCase Optionaler Variant-Wert. Wenn True, wird bei der Suche zwischen Groß- und Kleinschreibung unterschieden. Der Standardwert ist False.
MatchByte Optionaler Variant-Wert. Wird nur verwendet, wenn double byte-Sprachunterstützung ausgewählt oder installiert wurde. Wenn True, werden double byte-Zeichen nur mit Double-Byte-Zeichen verglichen. Wenn False, so können Double-Byte-Zeichen mit den entsprechenden Single-Byte-Zeichen übereinstimmen.
SearchFormat Optionaler Variant-Wert. Das Format für die Suche.
Hinweise
Die Angaben für LookIn, LookAt, SearchOrder und MatchByte werden jedesmal gespeichert, wenn Sie diese Methode verwenden. Falls Sie beim nächsten Aufruf dieser Methode keine Werte für die Argumente angeben, werden die gespeicherten Werte verwendet. Die Angabe dieser Argumente ändert die Einstellungen im Dialogfeld Suchen, und eine Änderung der Einstellungen im Dialogfeld Suchen ändert die gespeicherten Werte, die verwendet werden, wenn Sie die Argumente nicht angeben. Um Probleme zu vermeiden, sollten Sie bei jeder Verwendung dieser Methode diese Argumente ausdrücklich angeben.
Mit den Methoden FindNext und FindPrevious können Sie die Suche mit denselben Kriterien wiederholen.
Erreicht die Suche das Ende des angegebenen Suchbereichs, beginnt sie erneut am Anfang dieses Bereichs. Um zu verhindern, dass der Bereich erneut durchsucht wird, speichern Sie die Adresse der zuerst gefundenen Zelle, und vergleichen Sie dann jede nachfolgend gefundene Zelladresse mit dieser gespeicherten Adresse.
Wenn Sie bei der Suche von Zellen ein komplexeres Suchmuster verwenden wollen, können Sie eine For Each…Next-Anweisung in Kombination mit dem Like-Operator einsetzen. Der folgende Code durchsucht beispielsweise alle Zellen im Bereich A1:C5 nach einer Zelle, deren Schriftart mit den Buchstaben „Cour“ anfängt. Im Falle einer Übereinstimmung wird die Schriftart in Times New Roman geändert:
For Each c In [A1:C5]
If c.Font.Name Like „Cour*“ Then
c.Font.Name = „Times New Roman“
End If
Next
Beispiel
Dieses Beispiel findet alle Zellen im Bereich „A1:A500“ des ersten Arbeitsblattes, die den Wert 2 enthalten und ändert diesen Wert in 5.
With Worksheets(1).Range(„a1:a500“)
Set c = .Find(2, lookin:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Value = 5
Set c = .FindNext©
Loop While Not c Is Nothing And c.Address firstAddress
End If
End With
Gruß
das kannst du doch alles über ctrl-f machen – oder nicht?
Hallo,
da müsste man ein größeres Makro schreiben.
Eine Maske aufbereiten, suchen, anzeigen etc.
Habe im Moment keine Zeit dazu,
sorry,
Gruß Peter