Affecter le contenu inputbox à un doc word
Fermé
educhemann
Messages postés
30
Date d'inscription
dimanche 3 octobre 2004
Statut
Membre
Dernière intervention
30 décembre 2018
-
29 juin 2006 à 15:18
educhemann Messages postés 30 Date d'inscription dimanche 3 octobre 2004 Statut Membre Dernière intervention 30 décembre 2018 - 1 juil. 2006 à 02:38
educhemann Messages postés 30 Date d'inscription dimanche 3 octobre 2004 Statut Membre Dernière intervention 30 décembre 2018 - 1 juil. 2006 à 02:38
A voir également:
- Affecter le contenu inputbox à un doc word
- Supprimer une page word - Guide
- .Doc - Guide
- Espace insécable word - Guide
- Word a trouvé du contenu illisible - Guide
- Signer un document word - Guide
2 réponses
byakhlefncr
Messages postés
260
Date d'inscription
vendredi 1 juillet 2005
Statut
Membre
Dernière intervention
11 septembre 2008
63
29 juin 2006 à 15:58
29 juin 2006 à 15:58
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
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
educhemann
Messages postés
30
Date d'inscription
dimanche 3 octobre 2004
Statut
Membre
Dernière intervention
30 décembre 2018
1 juil. 2006 à 02:38
1 juil. 2006 à 02:38
ok merci
A+
A+