Contenu récent par gig83500

si on veut une action quand on Click n'importe où dans la colonne "A" uniquement et que l'on veut afficher un message Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then MsgBox "Click on " & Target.Address End If End...