Objeto TextInput (Word)
Representa um único campo de formulário de texto.
Use FormFields (Index), em que Index é o nome do indicador associado ao campo de formulário de texto ou ao número do índice, para retornar um objeto FormField . Use a propriedade TextInput com o objeto FormField para retornar um objeto TextInput . O exemplo a seguir exclui o conteúdo do campo de formulário de texto "Text1" do documento ativo.
ActiveDocument.FormFields("Text1").TextInput.Clear
O número de índice representa a posição do campo de formulário no FormFields coleção. O exemplo a seguir verifica o tipo do primeiro campo de formulário no documento ativo. Se o campo de formulário for um campo de formulário de texto, o exemplo definirá "Mission Critical" como o valor do campo.
If ActiveDocument.FormFields(1).Type = wdFieldFormTextInput Then
ActiveDocument.FormFields(1).Result = "Mission Critical"
End If
O exemplo a seguir determina se a variável ffield representa um campo de formulário de texto válido no documento ativo antes de definir o texto padrão.
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
Use o método Add com o objeto FormFields para adicionar um campo de formulário de texto. O exemplo a seguir adiciona um campo de formulário de texto ao início do documento ativo e, em seguida, define o nome do campo de formulário como "FirstName".
Set ffield = ActiveDocument.FormFields.Add( _
Range:=ActiveDocument.Range(Start:=0, End:=0), _
Type:=wdFieldFormTextInput)
ffield.Name = "FirstName"
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.