per tastenkombination eine UserForm aufrufen

Forumthread: per tastenkombination eine UserForm aufrufen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: per tastenkombination eine UserForm aufrufen

29.10.2005 20:53:08

Dieterlem

Ich habe folgendes Problem:
Ich möchte per Tastenkonbination eine Userform aufrufen. Die Tastenkombination soll jederzeit verwendbar sein. Bis jetzt bin ich nur soweit gekommen:


Sub Tastenkombi()
Application.OnKey "+%{b}", "userform_aufrufen"
End Sub


Sub userform_aufrufen()
Userform.show
End Sub

Das Problem ist, daß das Makro Tastenkombi ja nicht ständig aktiv ist.

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: per tastenkombination eine UserForm aufrufen

29.10.2005 21:20:04

Josef
AW: per tastenkombination eine UserForm aufrufen

29.10.2005 21:26:21

Dieterlem

AW: per tastenkombination eine UserForm aufrufen

29.10.2005 21:20:04

Josef

Hallo Dieter!
Einfach ins WorkbooOpen-Ereignis!

' **********************************************************************
' Modul: DieseArbeitsmappe Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Workbook_Activate()
Application.OnKey "+%{b}", "userform_aufrufen"
End Sub

Private Sub Workbook_Deactivate()
Application.OnKey "+%{b}"
End Sub

Private Sub Workbook_Open()
Application.OnKey "+%{b}", "userform_aufrufen"
End Sub

AW: per tastenkombination eine UserForm aufrufen

29.10.2005 21:26:21

Dieterlem

Hi danke so funktioniert es.
Gruß
Dieterlem