Lire valeur True/ False checkbox d'un fichier fermé

[BOUCHEZ JD]

Bonjour.

Quelqu'un connait il la syntaxe pour lire la valeur True/False d'un CheckBox
dans un fichier fermé du style :

if AUTRECLASSEUR.Checkbox1.Value = True then Msgbox "Est Coché"


Bon W.E

 

[Compte Supprimé 979]

Re : Lire valeur True/ False checkbox d'un fichier fermé

Salut BOUCHEZ JD,

Pour moi ce n'es pas possible, le CheckBox étant un "objet" inséré sur une feuille ...

En revanche, tu peux ouvrir un classeur de façon masquée, pas OLE automation

Sub test()
  Dim Chemin$, NomFich$
  Dim Wbk As Workbook
  Dim Sht As Worksheet
  
  Chemin = "d:\"
  NomFich = "NomFichier.xls"
  Set Wbk = GetObject(Chemin & NomFich)
  Set Sht = Wbk.Sheets("NomFeuill")
  ' Lire la valeur du CheckBox ICI
  ' Comment là, est la question
  Wbk.Close False
End Sub

A+

 

[Guest]

Re : Lire valeur True/ False checkbox d'un fichier fermé

Bonsoir,

Pour compléter la réponse de Bruno😀:

 'CheckBox barre d'outils contrôles
    Wkb.Sheets("Feuil1").CheckBox1.Value

Ou

'Case à cocher barre d'outils Formulaire
  Wkb .Sheets("Feuil1").Shapes("Case à cocher 2").DrawingObject.Value

devraient le faire

A+

 

[BOUCHEZ JD]

Re : Lire valeur True/ False checkbox d'un fichier fermé

RE

Super, c'est bon . Merci