Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1886 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Décocher toute les Checks box d'un doc word

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Décocher toute les Checks box d'un doc word

n°1444229
le_bat75
Posté le 18-09-2006 à 16:48:39  profilanswer
 

Bonjour,  
 
Voici mon problème : J'ai un document Word avec plein de check box. J'aimerai faire une petite macro qui décoche toute les Checks box en 1 coup. J'ai essayé le code suivant mais apparement le compilateur VBA Word n'accèpte pas le "Me.Controls" dans le code suivant :
 
Option Explicit
 
Sub esai()
Dim ctrl As Controls
For Each ctrl In Me.Controls
If TypeOf ctrl Is CheckBox Then
...
End If
Next
End Sub
 
Auriez vous une idée ? Merci d'avance

mood
Publicité
Posté le 18-09-2006 à 16:48:39  profilanswer
 

n°1444293
seniorpapo​u
Posté le 18-09-2006 à 18:15:54  profilanswer
 

bonjour,
 
a essayer:
 
For Each shapeLoop In ActiveDocument.InlineShapes
    With shapeLoop
     
        If .Type = wdInlineShapeOLEControlObject Then
            If .OLEFormat.ClassType = "Forms.CheckBox.1" Then
                MsgBox .OLEFormat.Object.Name
                .OLEFormat.Object.Value = False
            End If
        End If
    End With
Next


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Décocher toute les Checks box d'un doc word

 

Sujets relatifs
Construire un parser pour verifier du word[Word - VBA] Créer un userform sous VBA word
Créer un fichier wordWORD - VBA - Variable de tableau
Word type de variables[Resolu] Souci fusion automatisee en VBA sous word
Appeler une macro Word en C#Word raccourci clavier
Rechercher/Remplacer TROP LOURD en VBA WORD - Avis aux pros !{resolu}[vba-access] problème avec "word.application"
Plus de sujets relatifs à : Décocher toute les Checks box d'un doc word


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR