Private Sub Worksheet_Change(ByVal Target As Range)

[Evelynetfrancois]

Bonjour

Private Sub Worksheet_Change(ByVal Target As Range)
UserForm1.Show
End Sub

ici l'action "UserForm1.Show" fonctionne des qu uin changement intervient dans la feuille !!!!
comment faire la meme chose mais que si le changement intervient dans la colonne "E" ( plus precisement de E 3 à E 65636)

merci d avance pour toutes vos aides
E et F

 

[Mytå]

Re : Private Sub Worksheet_Change(ByVal Target As Range)

Salut le forum

Essaye avec ceci

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("E3:E65536")) Is Nothing Then
UserForm1.Show
End If
End Sub

Mytå

Edition pour ajout lien exemple de Intersect https://www.excel-downloads.com/threads/top-50-des-macros-preferees-des-xldiens.68392/

 

[Evelynetfrancois]

Re : Private Sub Worksheet_Change(ByVal Target As Range)

et bien !!
re MERCI beaucoup Mytå
j applique de suite !!
merci pour ta rapidité.........
a une prochaine avec plaisir .
E et F