Discussion :

[destruktor49]

Bonjour,

Après plusieurs heures de recherches sur la toiele et des demandes d'aide auprés de mon entourage je n'ai pas pu trouver comment remplacer Entrée par Tabulation lors de déplacements entre deux champs sur un formulaire.

La tabulation et les flêches directionnelles fonctionnent très bien mais les utilisateurs peuvent valider "mécaniquement" le contenu d'un champ avec la touche Entrée.

Le soucis c'est que cela génére des lignes supplémentaires et décale toute la présentation.



J'ai essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub EnterKeyMacro()
 ' Check whether the document is protected for forms
 ' and whether the protection is active.
 If ActiveDocument.ProtectionType = wdAllowOnlyFormFields And _
 Selection.Sections(1).ProtectedForForms = True Then
 ' Retrieve the bookmark of the current selection.
 ' This is equivalent to the name of the form field.
 myformfield = Selection.Bookmarks(1).Name
 ' Go to the next form field if the current form field
 ' is not the last one in the document.
 If ActiveDocument.FormFields(myformfield).Name <> _
 ActiveDocument.FormFields(ActiveDocument.FormFields.Count) _
 .Name Then
 ActiveDocument.FormFields(myformfield).Next.Select
 Else
 ' If the current form field is the last one,
 ' go to the first form field in the document.
 ActiveDocument.FormFields(1).Select
 End If
 Else
 ' If the document is not protected for forms,
 ' insert a tab stop character.
 Selection.TypeText Chr(13)
 End If
 End Sub

(en mettant des signets et en enregistrant les macros)

ou plus simplement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub EnterKeyMacro()
    SendKeys "{Tab}"
End Sub

et d'autres qui n'ont rien donné...

Pourriez vous m'indiquer la marche à suivre pour supprimer l'effet de la touche entrées ?

je vous adresse une copie du fichier en extension docx car il n'est pas possible d'envoyer du docm.

Merci d'avance.