Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Feuille visible et checkbox

Feuille visible et checkbox

1 réponse
Avatar
dpro
Bonjour
Je désire vérifier si une feuille est visible et remplir le checkbox selon
le résultat
Je pense utiliser la macro suivante

Sub Macro1()
For i = 1 To 8
Nomsheet = Cells(i + 2, 1)
CheckBox(i).Value = IIf(Worksheets(Nomsheet).Visible = 0, 0, -1)
Next i
End Sub

Checkbox (i) ne semble pas être autorisé ( la macro fonctionne si je
remplace (i) par 10)
Avez vous une façon de d'obtenir le résultat désiré.

--
Merci a l'avance den
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
isabelle
Bonjour,

essaie avec ActiveSheet.OLEObjects("CheckBox" & i )

isabelle

Bonjour
Je désire vérifier si une feuille est visible et remplir le checkbox selon
le résultat
Je pense utiliser la macro suivante

Sub Macro1()
For i = 1 To 8
Nomsheet = Cells(i + 2, 1)
CheckBox(i).Value = IIf(Worksheets(Nomsheet).Visible = 0, 0, -1)
Next i
End Sub

Checkbox (i) ne semble pas être autorisé ( la macro fonctionne si je
remplace (i) par 10)
Avez vous une façon de d'obtenir le résultat désiré.