Vor einigen Ausgaben wurde ein Tipp zum Anzeigen des Felds Suchen und Ersetzen und zum Festlegen der Dropdown-Liste Innerhalb auf Blatt angezeigt. Zu diesem Zeitpunkt berichtete ich, dass ich keinen Weg gefunden hatte, dies tatsächlich zu erreichen, da VBA keine Möglichkeit bot, dasselbe Dialogfeld Suchen und Ersetzen anzuzeigen, das angezeigt wird, wenn Sie Strg + F drücken.

In der vergangenen Woche habe ich dank des Beitrags eines großzügigen ExcelTips-Abonnenten herausgefunden, wie das geht. Das folgende Makro zeigt, wie die Aufgabe ausgeführt wird:

Sub DoBox()

ActiveSheet.Cells.Find What:="", LookAt:=xlWhole     Application.CommandBars("Worksheet Menu Bar").FindControl( _       ID:=1849, recursive:=True).Execute End Sub

Mit der Suchmethode können Sie die verschiedenen Parameter im Dialogfeld Suchen und Ersetzen festlegen. Anschließend wird auf das CommandBars-Objekt zugegriffen, um das Dialogfeld tatsächlich anzuzeigen.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (2486) gilt für Microsoft Excel 97, 2000, 2002 und 2003.