Rapport de message :*
 

Re: Case à Cocher

Titre du sujet : Re: Case à Cocher
par Mth le 31/10/2011 19:05:08

Bonsoir Hosni, Mytå

Une tentative d'explications, en attendant le retour de notre ami Mytå et espérant ne pas déformer ses propos:

Le code de la feuille bloque ici:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True

If Not Intersect(Target, Range("Afficher")) Is Nothing Then
        If Target = "" Then Target = "x" Else Target = ""
End If
End Sub
 

car il fait référence à une plage nommée qui n'existe pas dans le fichier. Pour le vérifier, cliquer sur l'onglet "Formules" puis dans le ruban sur "Gestionnaire de noms": pas de plage nommée "Afficher":



Pour créer cette zone nommée, cliquer sur "Nouveau" puis sur la ligne "Nom" indiquer le nom "Afficher", et sur la ligne "Fait référence à" reporter la formule proposée par Mytå.

Si besoin de plus d'explications pour nommer les plages de cellules, voir sur ce lien.

Bonne soirée à tous,

mth