Vérifie si le curseur est dans une plage

porcinet82

XLDnaute Barbatruc

• 4 Avril 2006

• #2

Salut Gab,

Tout simplement avec un code du genre :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(ActiveCell, Range('A1:A10')) Is Nothing Then
        MsgBox 'pas dans la plage'
    End If
End Sub

@+

 

Vote positif 0 Vote négatif

G

Gab

Guest

• 4 Avril 2006

• #3

Ah merci !!
Impec' !

A bientôt

 

Vote positif 0 Vote négatif

myDearFriend!

XLDnaute Barbatruc

• 4 Avril 2006

• #4

Bonsoir Gab, porcinet82,

Si je peux me permettre, juste un petit rectificatif car c'est l'inverse :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      If Not Intersect(ActiveCell, Range('A1:A10')) Is Nothing Then
            MsgBox 'EST dans la plage'
      End If
End Sub

Cliquez pour agrandir...

Cordialement,

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 5 Avril 2006

• #5

Bonjour a tous,

Oups 😱 effectivement c'est bien l'inverse, heureusement que certains veille au grain, donc merci myDearFriend.

@+

 

Vote positif 0 Vote négatif