Gruppe
Menue
Problem
Über eine Schaltfläche soll der Web-Assistenten-Dialog aufgerufen werden.
StandardModule: Modul1
Sub WebAssistent()
Dim cntr As CommandBarControl
Set cntr = Application.CommandBars.FindControl(ID:=3823)
cntr.Execute
End Sub