El_muchacho
Messages postés1Date d'inscriptionvendredi 13 mai 2016StatutMembreDernière intervention13 mai 2016
-
13 mai 2016 à 10:03
Bonjour, j'ai écrit une petite fonction sous Word associée à un bouton de fin. Cette fonction test toutes les cases à cocher du document et masque le contenu qui y est associé (à l'aide de signets), si les cases sont non cochées, lors du clique sur le bouton de fin.
Or, je pense avoir un petit souci avec mon programme, notamment avec ma variable qui permet de chercher le nom de la case à cocher.
Egalement, si il y a un moyen de faire la même chose plus simplement, je suis preneur.
Merci
Private Sub CommandButton1_Click() With ActiveDocument
Dim intI As Integer intI = 0
Dim Str As String
For intI = 0 To 1000 Step 1
Str = "CaseACocher" & intI
If .FormFields(Str).CheckBox.Value = False Then .Bookmarks(Str).Range.Font.Hidden = True