Sub voor alle textboxes in het userform

[mark1987vw]

Hallo Allemaal,

Ik heb een sub aangemaakt in een aparte module waarmee ik in tabletmodus het schermtoetsenbord laat verschijnen
Deze heet: KeyboardOpen

Nu wil ik dat het toetsenbord verschijnt wanneer ik een textbox open. Dit kan met de volgende code:

Private Sub TextBox1_Enter()
KeyboardOpen
End Sub

Dit werkt goed maar nu heb ik veel verschillende Userforms met veel verschillende Textboxes, die ook allemaal een andere naam hebben.
Ik kan uiteraard 1 voor 1 die code daaraan toevoegen maar is het ook mogelijk om dit toe te passen op alle textboxes met 1 code?

Ik heb al veel geprobeerd maar ik krijg het niet voor elkaar.
Bedankt alvast

 

[edmoor]

Gebruik er een Klassenmodule voor.
Voorbeeld:
Bekijk bijlage TextBox_class.xlsm