Cze wszystkim
Po wielu badaniach i testach nie mogę utworzyć skrótu klawiaturowego, aby aktywować cmdbutton w UserForm.
Próbowałem różnych podejść, z których ostatnie to to:
Prywatny Sub UserForm_Initialize()
Me.KeyPreview = Prawda
Koniec subwoofera
Private Sub UserForm1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Jeśli KeyCode = vbKeyF4 to
Zadzwoń pod cmdButton_1_Click
Zakończ jeżeli:
Koniec subwoofera
Przetestowałem też polecenie: Application.OnKey, ale nic nie pomaga!
Idealnie byłoby, gdyby skrót aktywował cmdbutton bez konieczności określania ogniskowej przez formularz użytkownika.
Powinienem zaznaczyć, że pracuję nad SW 2010. Mogą wystąpić problemy ze zgodnością...
Jeśli kiedykolwiek spotkałeś się z tym problemem i znasz odpowiednie elementy sterujące, byłbym wdzięczny.
Dziękuję!