worksheet_selectionchange

[LUCIEN]

Hello le forum

Je suis debutant et j aurais voulu savoir comment cibler le worksheet_selectionchange sur une colonne b20:b30

Merci

 

[myDearFriend!]

Bonsoir LUCIEN,

Si j'ai bien compris la question :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      If Not Application.Intersect(Target, Range('B20:B30')) Is Nothing Then
            MsgBox 'Sélection de ' & Target.Address
      End If
End Sub

Cordialement,

 

[KUCIEN]

Re MyDearFriend

Tu as bien compris la question !!!!

MERCI !!!