Dialoge öffnen-Suchfenster

Bild

Betrifft: Dialoge öffnen-Suchfenster
von: Rolf Dätwyler
Geschrieben am: 04.12.2003 14:49:07

Hi Folks,

Durch die Tastenkombination Ctrl+F kann man das Suchfenster aktivieren.
Wie kann ich diesen Vorgang auf ein Private Sub Open() übertragen, d.h. wie schaffe ich es, dass beim öffnen der Datei per Makro automatisch das Suchfenster aufgeht?

Danke für eure immer hilfreichen Antworten!

Rolf

Bild


Betrifft: AW: Dialoge öffnen-Suchfenster
von: K.Rola
Geschrieben am: 04.12.2003 15:00:09

Hallo,

Option Explicit

Sub Suchen()
CommandBars.FindControl(ID:=1849).Execute
End Sub


Gruß K.Rola


Bild


Betrifft: AW: Dialoge öffnen-Suchfenster
von: Bärnd
Geschrieben am: 04.12.2003 15:03:30

Hallo Rolf,

versuch es mal mit

Application.CommandBars("Built-in Menus").FindControl(ID:=1849,Recursive:=True).Execute

Ciao

der Bärnd


Bild


Betrifft: Danke für die Antworten! o.T.
von: Rolf
Geschrieben am: 04.12.2003 15:05:02

.


Bild

Beiträge aus den Excel-Beispielen zum Thema " Dialoge öffnen-Suchfenster"