Tester l'appartenance d'une cellule à une plage nommée

Bonjour !

Est-il possible de tester l'appartenance d'une cellule à une plage nommée "Emp1" avec une fonction dédiée à cet effet genre "IsIN(Range("Emp1"))" ou dois-je me résoudre au test If ci-bas ?

Sub Worksheet_Change(ByVal Emp As range)

If Emp.Column = range("Emp1").Column And Emp.Row < 31 And Emp.Row > 21 Then

Merci d'avance,

iBenny

Bonsoir,

Un code pour tester l'appartenance de la cellule active à une zone précédemment nommée EMPLOYE.

Sub test()
    If Not Application.Intersect(ActiveCell, Range("EMPLOYE")) Is Nothing Then
        MsgBox "OK"
    Else
        MsgBox "PAS OK"
    End If
End Sub

Génial Raja !

Mille mercis !

iBenny

Désolé pour toutes les corrections !

Dans :

If Not Application.Intersect(ActiveCell, Range("EMPLOYE")) Is Nothing Then

pourquoi tester un double négatif et non pas un positif ?

Pourquoi "Ce n'est pas rien" au lieu de "C'est quelque chose" ?

Merci d'avance,

iBenny

Re,

Parceque "Is Something" n'existe pas.

Raja a écrit :

Parceque "Is Something" n'existe pas.

Donc, tu es en train de dire que la valeur de retour de la propriété :

Application.Intersect(ActiveCell, Range("EMPLOYE"))

renvoi

quand l'intersection n'existe pas = "Nothing"

quand il y a intersection = Rien du tout sur quoi tester !!!

Merci d'avance,

iBenny

Re,

Non je ne voulais pas dire ça. Comme tu ne peux pas tester "Is Something" tu testes "Not ... Is Nothing" qui en logique est la même chose.

Bonjour MahaRaja,

j'avais bien compris que l'expression "Is Something" n'existait pas mais, dans l'absence d'intersection, la propriété renvoie-t-elle qqe chose qu'on pourrait tester ? Ce serait bizarre qu'une propriété ne renvoi... rien -

Merci d'avance

iBenny

Bonjour,

si l'intersection existe la fonction te retourne le range, si elle n'existe pas elle te répond Nothing (=intersection vide).

Toi tu veux savoir si elle existe donc tu ne peux que tester si l'intersection n'est pas vide.

Si ça te choque trop tu peux toujours ne pas mettre le Not et faire ton traitement dans le Else.

Un peu plus long, mais si tu lis mieux le programme ainsi pourquoi pas.

eric

D'accord ! je me rends...

Merci à tous des explications !

iBenny