Gruppe
Allgemein
Problem
Der Suchdialog soll über VBA-Befehl aufgerufen werden.
StandardModule: Modul1 Sub SuchDialog() Dim oBtn As CommandBarControl Set oBtn = Application.CommandBars.FindControl(ID:=1849) oBtn.Execute End Sub