Affecter le contenu inputbox à un doc word

educhemann Messages postés 30 Statut Membre -  
educhemann Messages postés 30 Statut Membre -
VBA_word
j'ai esaayé plusiuers fomules pour insere le contenu d'un input box ds un formulaire word, par exemple:
Private Sub permis_Click()
Dim pc As String
pc = InputBox("précisez")
If pc = true Then
ActiveDocument.FormFields("pc").resulte (pc)
Else
End If
End Sub

ca ne foctionne toujours pas!
ou est l'erreur?
merci d'avance
A voir également:

2 réponses

Réponse 1 / 2
byakhlefncr Messages postés 260 Statut Membre 63
 
Salut,

je crois que l'eereur ce situe au niveau du test
If pc = true Then (pc est déclarée String et ne peut être comparée à une valeur logique: true)
un autre point je n'ai pas compris ce que tu désire faire du texte saisie et je pense que ActiveDocument.FormFields("pc").resulte (pc) générera une erreur et que signifie pc .

Bref, J'ai essayé ce code qui inserre à la fin la saisie dans un inputbox.

Private Sub permis_Click()
Dim pc As String
pc = InputBox("précisez")
If pc <> "" Then
ActiveDocument.Words.Last.InsertAfter pc
End If
End Sub

Bonne chance
0
Réponse 2 / 2
educhemann Messages postés 30 Statut Membre
 
ok merci

A+
0