Microsoft 365 Private Sub Worksheet_SelectionChange(ByVal Target As Range)

[Claudy]

Bonjour à tous,
question:
Quelle est la différence entre

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
et
Private Sub Worksheet_Change(ByVal Target As Range)

Merci,

Claudy

 

[M12]

Bonjour à tous,
question:
Quelle est la différence entre

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
et
Private Sub Worksheet_Change(ByVal Target As Range)

Merci,

Claudy

Bonjour
Comme la définition l'indique Selection_Change --> Change sur une sélection qui change (après validation cellule)
et Change --> Change à chaque modification (frappe lettre, chiffre, etc) sur la cellule

 

[Claudy]

Bonjour
Comme la définition l'indique Selection_Change --> Change sur une sélection qui change (après validation cellule)
et Change --> Change à chaque modification (frappe lettre, chiffre, etc) sur la cellule

Ok, merci
Je voudrais lancer un USF quand je modifie une cellule en "A1:A20" et rien que dans cette zone.
Selection_Change ou Change?

Merci,
Claudy

 

[TooFatBoy]

Bonjour,

Sauf erreur de ma part, SelectionChange c'est quand tu sélectionnes une nouvelle cellule, et Change c'est quand tu modifies le contenu d'une cellule.
Donc je dirais : utilise Change.

 

[Eric C]

Bonjour le forum
Bonjour Claudy, M12
Oupssss - Bonjour Jacky

Ce sera Change : Un événement se déclenche lors de modifications du contenu des cellules de la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1:A20")) Is Nothing Then
 UserForm1.Show
 End If
End Sub

Bon ouikand
@+ Eric c

 

[Claudy]

Bonjour le forum
Bonjour Claudy, M12
Oupssss - Bonjour Jacky

Ce sera Change : Un événement se déclenche lors de modifications du contenu des cellules de la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1:A20")) Is Nothing Then
 UserForm1.Show
 End If
End Sub

Bon ouikand
@+ Eric c

Merci à tous,
Nickel,
Bon wk,
Claudy