Rendre des Checkbox invisible VBA Word

Résolu
Chippen Messages postés 7 Statut Membre -  
m@rina Messages postés 26238 Statut Contributeur -
Bonjour,

Je souhaiterai faire un document type sur word avec des énumérations à l'aide du formulaire en utilisant des checkbox.

Je voudrai que les cases non cochés n'apparaissent pas lors de l'impression...

Je ne connais rien au macro sur word. C'est une grande première pour moi...

Merci d'avance pour votre aide :)
A voir également:

1 réponse

Réponse 1 / 1
m@rina Messages postés 26238 Statut Contributeur 11 480
 
Bonjour

Un exemple supposant que tu as utilisé des contrôles de contenu : 

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


m@rina

1
Chippen Messages postés 7 Statut Membre
 
Merci beaucoup pour ta réponse.

Je dois donc passer par l'onglet "développeur" et insérer une case à cocher - Contrôle de contenu ?

Quand je le fais cela ne marche pas. Aurais-tu un exemple a me montrer stp ?
0
m@rina Messages postés 26238 Statut Contributeur 11 480
 
Bonjour

Oui ce sont bien des contrôles de contenu.
Pour que ça fonctionne, il faut copier coller la macro dans l'éditeur de macro, puis une fois le formulaire complété, exécuter la macro.

Si tu ne sais pas où mettre la macro, j'explique ici :
https://faqword.com/index.php/word/tutos/toutes-versions/615-le-b-a-ba-du-vba#forum

m@rina
0
Chippen Messages postés 7 Statut Membre > m@rina Messages postés 26238 Statut Contributeur
 
Super merci ça marche mes cases n'apparaissent pas lors de l'impression en revanche mon texte lui apparaît.

Je n'arrive pas a trouver une solution pour intégrer mon texte avec la case a cocher. Cela m'indique que je ne peux pas modifier car la sélection est verrouillé... Pourtant je n'ai pas restreint la modification...

Aurais tu une solution pour que je puisse écrire du texte à côté de ma case a cocher ?

En tout cas merci beaucoup pour tes réponses rapides.
0
m@rina Messages postés 26238 Statut Contributeur 11 480
 
Bonjour,

Effectivement tu as parlé de rendre les cases invisibles mais pas le texte.

Je te conseille d'utiliser plutôt des Contrôles ActiveX bien plus malléables à la programmation car ils sont faits pour ça.
Je n'ai pas le temps pour l'instant, je te ferai la macro ce soir.

m@rina
0
Chippen Messages postés 7 Statut Membre > m@rina Messages postés 26238 Statut Contributeur
 
Merci, je n'ai pas fait la différence des différentes fonctionnalités des cases lorsque j'ai écris mon commentaire.
0