Vérification de l’état de la touche clavier« Verrouillage majuscule »

dbonneaud · 26 Septembre 2012

Bonjour à tous,
Existe-t-il une procédure VBA permettant de vérifier, au lancement d’une UserForm, si la touche clavier« Verrouillage majuscule » est activée.
Merci pour votre aide.

Dormeur74 · 26 Septembre 2012

Re : Vérification de l’état de la touche clavier« Verrouillage majuscule »

Les API le permettent. Tu colles celles-ci dans un module.

Code:

Option Explicit

Private Declare Sub keybd_event Lib "user32" _
(ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Declare Function GetKeyboardState Lib "user32" _
(pbKeyState As Byte) As Long
Const VK_CAPITAL = &H14

Sub Test()
    Dim etat As Boolean
    Dim keys(0 To 255) As Byte
    
    GetKeyboardState keys(0)
    etat = keys(VK_CAPITAL)
    MsgBox etat
End Sub

dbonneaud · 26 Septembre 2012

Re : Vérification de l’état de la touche clavier« Verrouillage majuscule »

Merci et bonne journée

Vérification de l’état de la touche clavier« Verrouillage majuscule »

dbonneaud

XLDnaute Nouveau

Dormeur74

XLDnaute Occasionnel

dbonneaud

XLDnaute Nouveau

Discussions similaires

Vérification de l’état de la touche clavier« Verrouillage majuscule »

dbonneaud

XLDnaute Nouveau

Dormeur74

XLDnaute Occasionnel

dbonneaud

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency