Bonjour,

J'aimerai créer un formulaire avec des signet dans l'en-tête de la page.

Mais une erreur se produit :

Erreur d'exécution '5678':

Impossible de trouver le signet spécifié.

En cherchant un peut sur internet, j'ai trouvé que le signet dans l'en-tête ne fonctionne pas. Il fallait faire quel que chose en VBA pour l'ouvrir.

Ce que j'aimerai savoir c'est le code à introduire.

Voici mon début de code :

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
Private Sub buOk_Click()
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Prénom"
    Selection.TypeText Text:=edPrenom.Text
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Nom"
    Selection.TypeText Text:=edNom.Text
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Date"
    Selection.TypeText Text:=edDate.Text
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Numéro"
    Selection.TypeText Text:=edNumero.Text
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Profession"
    Selection.TypeText Text:=edProfession.Text
 
    Selection.GoTo What:=wdGoToBookmark, Name:="Titre"
    Selection.TypeText Text:=edTitre.Text
 
    ufmMain.Hide
End Sub
Merci d'avance pour l'aide.

Si vous avez pas compris dite-le moi