[VBA] Keycode pour le point

Bonjour,

Pourriez vous me dire quel nombre correspond au point "." pour le keycode?
J'ai bien essayé ce qu'il y a marqué dans la faq, mais ça me donne un point virgule...
Merci d'avance

Ceuce

Bonsoir,

C'est avec "KeyCode = 190 ou KeyCode = 188" que ça ne passe pas?
Il faut essayer avec : KeyCode = vbKeyDecimal

Cordialement.

Excuse moi, en fait je me suis complétement mélangé les pédales...
En fait qd j'applique le code de la faq

Code:

---

1 2 3 4

If (KeyCode = 190) Then KeyCode = 188 End If

---

Au moment où je tape le point cela me donne un point d'interrogation alors que je souhaiterai une virgule. Le keycode 190 correspond bien au point, mais 188 correspond au point d'interrogation et non à la virgule.

Donc je recherche le keycode pour la virgule...

mais je viens de voir que tu avais qd même répondu à ma question, et qu'en plus ça marche! Alors merci beaucoup francishop, à plus

Ceuce

euh... en fait il me faudrait quand même le keycode pour la virgule. Ou alors pourriez-vous me dire où trouver la correspondance chiffre/caractère? Merci

Ceuce

Bonsoir,

Il suffit de demander :
Liste des constantes des touches
vbKey0
vbKey1
vbKey2
vbKey3
vbKey4
vbKey5
vbKey6
vbKey7
vbKey8
vbKey9
vbKeyA
vbKeyAdd
vbKeyB
vbKeyBack
vbKeyC
vbKeyCancel
vbKeyCapital
vbKeyClear
vbKeyControl
vbKeyD
vbKeyDecimal
vbKeyDelete
vbKeyDivide
vbKeyDown
vbKeyE
vbKeyEnd
vbKeyEscape
vbKeyExecute
vbKeyF
vbKeyF1
vbKeyF2
vbKeyF3
vbKeyF4
vbKeyF5
vbKeyF6
vbKeyF7
vbKeyF8
vbKeyF9
vbKeyF10
vbKeyF11
vbKeyF12
vbKeyF13
vbKeyF14
vbKeyF15
vbKeyF16
vbKeyG
vbKeyH
vbKeyHelp
vbKeyHome
vbKeyI
vbKeyInsert
vbKeyJ
vbKeyK
vbKeyL
vbKeyLButton
vbKeyLeft
vbKeyM
vbKeyMButton
vbKeyMenu
vbKeyMultiply
vbKeyN
vbKeyNumlock
vbKeyNumpad0
vbKeyNumpad1
vbKeyNumpad2
vbKeyNumpad3
vbKeyNumpad4
vbKeyNumpad5
vbKeyNumpad6
vbKeyNumpad7
vbKeyNumpad8
vbKeyNumpad9
vbKeyO
vbKeyP
vbKeyPageDown
vbKeyPageUp
vbKeyPause
vbKeyPrint
vbKeyQ
vbKeyR
vbKeyRButton
vbKeyReturn
vbKeyRight
vbKeyS
vbKeySelect
vbKeySeparator
vbKeyShift
vbKeySnapshot
vbKeySpace
vbKeySubtract
vbKeyT
vbKeyTab
vbKeyU
vbKeyUp
vbKeyV
vbKeyW
vbKeyX
vbKeyY
vbKeyZ

Cordialement.
Ps :
Voir :KeyAscii = 59 (virgule)
KeyAscii = 46 (point)