Bonjour,
J'essaie toujours de créer une macro qui permette de remplir une page Word
en écrivant à des endroits définis le contenu de TextBox apparaissant dans
un UserForm qui s'ouvre avec le fichier.
J'ai défini un signet que j'ai appelé tutu et j'arrive maintenant à mettre
le point d'insertion là où je veux avec
Selection.GoTo What:=wdGoToBookmark, Name:="Tutu"
mais je ne trouve pas de moyen pour écrire le contenu de la TextBox.
J'ai essayé :
Selection.GoTo What:=wdGoToBookmark, Name:="Tutu"
Selection.InsertAfter TextBox1.Value (ça plante ici, erreur 424, objet
requis)
Ou bien :
Selection.GoTo What:=wdGoToBookmark, Name:="Tutu"
'Selection = TextBox1.Text (pareil)
J'ai essayé également de déclarer en variable le contenu de ma TextBox
Dim Toto As String
Set Toto = TextBox1.Value (ça plante ici, erreur de compilation, objet
requis)
Selection.GoTo What:=wdGoToBookmark, Name:="Tutu"
Selection.TypeText Text:=Toto
J'ai essayé également de remplir la propriété ControlSource de la TextBox
avec le nom du signet mais ça ne marche pas (Dans Excel, il suffit de mettre
l'adresse de la cellule.)
Il faudrait que je comprenne comment il faut faire car ça m'a l'air un peu
différent d'Excel.
Nota, je travaille sur Word 97 avec Windows 98 ou NT4
Je nai rien trouvé sur le site http://faq.ms.word.free.fr/ relatif aux
UserForm
Merci de bien vouloir me donner encore un petit coup de pouce
Jean-Pierre
