erreur 438 dans mon code

[teamtat]

Bonjour,
Quand j'execute mon code, une l'erreur propriété ou méthode non gérée par cet objet ce produit

 With ThisWorkbook.Worksheets("Saisie de données MOD")
If .CheckBox5.Value = True Or .CheckBox6.Value = True Or .CheckBox1.Value = True Or .CheckBox64.Value = True Or .CheckBox2.Value = True Or .CheckBox3.Value = True Or .CheckBox8.Value = True Or .CheckBox12.Value = True Or .CheckBox17.Value = True Or .CheckBox65.Value = True Or .CheckBox18.Value = True Then
         
     wk.Worksheets("Masque saisie").mac2 = True
Else
      wk.Worksheets("Masque saisie").mac2 = False
 End If
 End With

l'erreur s'affiche sur cette ligne :

 If .CheckBox5.Value = True Or .CheckBox6.Value = True Or .CheckBox1.Value = True Or .CheckBox64.Value = True Or .CheckBox2.Value = True Or .CheckBox3.Value = True Or .CheckBox8.Value = True Or .CheckBox12.Value = True Or .CheckBox17.Value = True Or .CheckBox65.Value = True Or .CheckBox18.Value = True Then

Merci

 

[Paritec]

Re : erreur 438 dans mon code

Bonjour teamtat,
alors sans fichier???
est-ce que tu es sur que toutes tes checkbox sont bien là (existent)
si une manque tu plantes normal

a+
papou

 

[jeanpierre]

Re : erreur 438 dans mon code

Bonjour teamtat, papou,

Non seulement tu doubles tes fils mais aussi tu es impatient (16 minutes pour relancer un fil et 10 pour créer celui-ci ensuite)

https://www.excel-downloads.com/threads/propriete-ou-methode-non-geree-par-cet-objet.142200/

Une question, un fil.... Merci et bonne journée.

Jean-Pierre