BOnjour ,

J'ai édité une macro relié à des formulaire de champ case a cocher et zone de saisie de texte

L'idée est que l'orsque je coche la case un certain texte apparait et que lorsque je la décoche un autre apparait .

La macro fonctionne , seulement la chaine de caractère que je veux faire apparaitre est trop longue et j'ai un message d'erreur erreur 4608 !

Pourtant sur les parametre de la zone de texte j'ai bien mis nombre de caractères illimités . Y a t il une solution pour pouvoir insérer beaucoup de lignes sans limites ?

Je suis sous word 2013 et voici la macro :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub caseacocher1()
 
Dim macase As CheckBox
Dim montexte As FormField
 
Set macase = ActiveDocument.FormFields("Case1").CheckBox
Set montexte = ActiveDocument.FormFields("Texte1")
If macase.Value = True Then
montexte.Result = "Poste 1: Réunion d'enclenchement, plan de prévention et visite d'inspection commune "
Else: montexte.Result = ""
End If
 
 
End Sub
Merci d'avance
Yoann