Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1316to1320
1316to1320
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Suchen-Fenster öffnen

Forumthread: Suchen-Fenster öffnen

Suchen-Fenster öffnen
08.06.2013 09:07:47
Marcus
Hallo,
gibt es einen VBA-Befehl das Suchen-Fenster zu öffnen? Mit einer Makroaufzeichnung wird nur der Vorgang mitgezeichnet, wenn auch wirklich gesucht wird.
Gruß
Marcus

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Application.SendKeys "^f"
08.06.2013 09:35:22
{Boris}
Gruß
Boris

AW: Application.SendKeys "^f"
08.06.2013 09:47:11
ransi
Hallo Markus
Oder ganz direkt ohne sendkeys:
Application.CommandBars.FindControl(ID:=1849).Execute

ransi

Anzeige
Zu viele Tastenanschläge ;-)) oT
08.06.2013 09:48:31
{Boris}
VG, Boris

AW: Zu viele Tastenanschläge ;-)) oT
08.06.2013 10:00:34
Marcus
Hallo,
danke beiden. Das ist aber schön.
Mit... 
Private Sub Worksheet_Activate()
Application.CommandBars.FindControl(ID:=1849).Execute
End Sub

... hab ich das Fensterchen nun auf meinem gewünschten TB.
Was muss ich in... 
Private Sub Worksheet_Deactivate()
...hineinschreiben, dass es bei den anderen TB's wieder weg ist?
End Sub
Gruß Marcus

Anzeige
AW: Zu viele Tastenanschläge ;-)) oT
08.06.2013 10:25:24
{Boris}
Hi Marcus,
quick and dirty:
Private Sub Worksheet_Deactivate()
Application.CommandBars.FindControl(ID:=1849).Execute 'nochmal aufrufen, um den Fokus drauf zu  _
setzen
Application.SendKeys "{ESC}"
End Sub
VG, Boris

AW: Zu viele Tastenanschläge ;-)) oT
08.06.2013 11:13:24
Marcus
Hallo Boris,
danke, ich bin geholfen!
Gruß
Marcus
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige