Effectivement, dans Excel et avec un clavier français, l'appui sur la touche Point donne bien une virgule, mais pas dans Word. On peut utiliser la macro suivante. A chaque exécution de cette macro, la touche point basculera entre virgule et point. Si vous utilisez fréquemment cette fonction, mettez la macro sur une barre d'outils.
Cette macro est à mettre dans le normal.dotm :
Public Sub PointOuVirgule()
Dim Nouveau As Boolean
Dim Etat As String
Dim Separateur As String
Dim Contexte As String
Dim oRaccourci As KeyBinding
CustomizationContext = NormalTemplate
Contexte = NormalTemplate.Name
Nouveau = True
Separateur = Application.International(wdDecimalSeparator)
' si le raccourci du point numérique est déjà affecté on le désactive
For Each oRaccourci In KeyBindings
If oRaccourci.KeyCode = BuildKeyCode(wdKeyNumericDecimal) Then
oRaccourci.Clear: Nouveau = False: Etat = "désactivé"
End If
Next oRaccourci
' sinon on l'active avec le séparateur des options régionales
If Nouveau Then
KeyBindings.Add KeyCategory:=wdKeyCategorySymbol, _
KeyCode:=BuildKeyCode(wdKeyNumericDecimal), _
Command:=String(2, Separateur)
Etat = "activé"
End If
MsgBox "Séparateur décimal régional " & Separateur & vbCr & _
Etat & vbCr & "dans " & Contexte, vbInformation, "Pavé numérique"
Set oRaccourci = Nothing
End Sub