Masquer un contrôle de contenu non complété

Résolu
occititi Messages postés 1 Statut Membre -  
 Janka -
Bonjour,

Pour masquer un contrôle de contenu non complété j'ai utilisé la macro de m@rina

Sub masquer2()
'macro écrite par m@rina
Dim controle As ContentControl
Dim cont_texte
For Each controle In ActiveDocument.ContentControls
cont_texte = controle.Range
If cont_texte = controle.PlaceholderText Then
controle.Range.Font.Hidden = True
Else: controle.Range.Font.Hidden = False
End If
Next
End Sub

Chez moi ça ne fonctionne pas.
Lors de l'exécution j'ai le message :
Variable objet ou variable bloc With non définie

Je ne connais rien en VBA.
J'utilise Office 365.

Je vous remercie pour votre aide !

Configuration: Windows / Firefox 70.0

4 réponses

  1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour à tous,

    un essai en sécurisant :
    Sub masquer2()
        'macro écrite par m@rina
        Dim controle As ContentControl
        For Each controle In ActiveDocument.ContentControls
            If controle.Type = wdContentControlRichText Or controle.Type = wdContentControlText Then
                controle.Range.Font.Hidden = controle.Range = controle.PlaceholderText
            End If
        Next
    End Sub

    eric

    2
    1. Janka
       
      Oui, super merciiii ! ça fonctionne maintenant :)
      0
  2. m@rina Messages postés 27459 Date d'inscription   Statut Modérateur Dernière intervention   11 562
     
    Bonjour,

    La macro vérifie si les contrôles ont été complétés. Il faut donc que ce soit des contrôles que l'on puisse compléter...

    Et donc probablement que vous avez dans vos contrôles des cases à cocher... Une case à cocher peut être cochée ou non. Si elle n'est pas cochée, on ne peut pas savoir si c'est volontairement non cochée ou bien si c'est parce que ça n'a pas été "complété"... "Complétée" ne signifie donc rien pour une case à cocher.

    La macro fonctionnera avec les contrôles de contenu de texte, de listes déroulantes et de sélecteur de date. Ça ne fonctionnera pas non plus avec des images.

    m@rina
    1
  3. Janka
     
    Bonjour,

    Je rencontre le même problème que vous, est-ce que vous avez entre-temps résolu le problème ? Et si oui, pourriez-vous m'indiquer comment svp ?

    D'avance, merci pour votre aide !
    0
  4. Janka
     
    Merci pour votre réponse.
    Mais il s'agit bien de contrôle de contenus de texte... Il y a aussi des cases à cocher et des dates, mais je souhaite bel bien masquer les contrôles de textes non complétés uniquement.

    Auriez-vous une autre idée d'où peut provenir le problème ???
    0