Objet TextInput (Word)
Représente un champ de formulaire donné de type texte.
Utilisez FormFields (Index), où Index est le nom de signet associé au champ de formulaire texte ou le numéro d’index, pour renvoyer un objet FormField . Utilisez la propriété TextInput avec l’objet FormField pour renvoyer un objet TextInput . L'exemple suivant montre comment supprimer le contenu du champ de formulaire texte « Text1 » du document actif.
ActiveDocument.FormFields("Text1").TextInput.Clear
Le numéro d'index représente la position du champ de formulaire dans le FormFields collection. L'exemple suivant montre comment vérifier le type du premier champ de formulaire du document actif. Si celui-ci est un champ texte, l'exemple montre comment affecter « Mission critical » en tant que valeur de champ.
If ActiveDocument.FormFields(1).Type = wdFieldFormTextInput Then
ActiveDocument.FormFields(1).Result = "Mission Critical"
End If
L'exemple suivant montre comment déterminer si la variable ffield représente un champ de formulaire texte valide dans le document actif avant de définir le texte par défaut.
Set ffield = ActiveDocument.FormFields(1).TextInput
If ffield.Valid = True Then
ffield.Default = "Type your name here"
Else
MsgBox "First field is not a text box"
End If
Utilisez la méthode Add avec l’objet FormFields pour ajouter un champ de formulaire de texte. L’exemple suivant montre comment ajouter un champ de formulaire texte au début du document actif, puis affecter « FirstName » au nom du champ de formulaire.
Set ffield = ActiveDocument.FormFields.Add( _
Range:=ActiveDocument.Range(Start:=0, End:=0), _
Type:=wdFieldFormTextInput)
ffield.Name = "FirstName"
Référence du modèle objet Word
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.