Wie Suchfunktion mit vba öffnen und nur eingeblendete Spalten durchsuchen

[roger]

Hallo!

Ich habe in Excel´03 mehrer Listen nebeneinander erstellt. Die die ich
gerade brauche ist eingeblendet, der Rest per Makro ausgeblendet. Mit
Strg+F kann man zwar eine Suchfunktion öffen, die mir aber aus 2
Gründen nicht gefällt.

1. Gesucht wird auch in den ausgeblendeten Bereichen und 2. Das
Suchfenster behindert immer die Sicht auf die Liste/Tabelle.

Kann man eine entsprechende Suchfunktion mithilfe von VBA auch direkt
in der Tabelle realisieren?
Also, der Suchbegriff wird in eine Zelle eingegeben und per
Schaltfläche/Button wird nur in den eingeblendeten Spalten
(z.B.E5:F1000) gesucht und durch nochmaliges drücken wird
weitergesucht (in den eingeblendeten Spalten). Der Listenbereich fängt
mit Spalte B an.

Wenn das nicht geht, kann man wenigstens die Excel-Suchfunktion per
Makro öffnen?

Autofilter kenne ich, finde ich aber unpraktisch (zuviel rumgeklicke).

Gruß
Roger

[stefan onken]

Post by roger
Hallo!
Ich habe in Excel´03 mehrer Listen nebeneinander erstellt. Die die ich
gerade brauche ist eingeblendet, der Rest per Makro ausgeblendet. Mit
Strg+F kann man zwar eine Suchfunktion öffen, die mir aber aus 2
Gründen nicht gefällt.
1. Gesucht wird auch in den ausgeblendeten Bereichen und 2. Das
Suchfenster behindert immer die Sicht auf die Liste/Tabelle.
Kann man eine entsprechende Suchfunktion mithilfe von VBA auch direkt
in der Tabelle realisieren?
Also, der Suchbegriff wird in eine Zelle eingegeben und per
Schaltfläche/Button wird nur in den eingeblendeten Spalten
(z.B.E5:F1000) gesucht und durch nochmaliges drücken wird
weitergesucht (in den eingeblendeten Spalten). Der Listenbereich fängt
mit Spalte B an.
Wenn das nicht geht, kann man wenigstens die Excel-Suchfunktion per
Makro öffnen?
Autofilter kenne ich, finde ich aber unpraktisch (zuviel rumgeklicke).
Gruß
Roger

hallo Roger,
in VBA gibt es die Find-Methode (siehe VBA-Hilfe). Um einen Bereich
schrittweise zu durchsuchen, musst du den After-Parameter nutzen.
Mit FindNext kannst du auch erst den ganzen Bereich durchsuchen und
dann eine Trefferliste ausgeben.

Gruß
stefan