VBA évènement sur plage de cellules

[chifounou]

Bonjour,

J'ai écrit ce petit bout de code à la racine de la feuille

Private Sub Worksheet_Change(ByVal target As Range)
   Application.EnableEvents = False
   If Not Intersect(target, Range("E5")) Is Nothing Then
       selection.Offset(Range("AI3").Value, 1).Select
    End If
   Application.EnableEvents = True
End Sub

Maintenant, au lieu d'un déclencheur en cas de modification du contenu de la case E5, j'aimerai que celà ce déclenche pour n'importe quelle case du Range E5:E100

Que changer ?
Merci beaucoup

 

[cathodique]

Re : VBA évènement sur plage de cellules

If Not Intersect(target, Range("E5:E100")) Is Nothing Then

Essaie ceci

 

[chifounou]

Re : VBA évènement sur plage de cellules

Quelle bourrique ! Merci

Autre question, j'aimerais que la marco ne s'active que si la valeur de cellule target est changée pour une valeur et que rien ne se passe si la modification amène à vider la cellule.
J'ai pas réussi

Merci d'avance

 

[cathodique]

Re : VBA évènement sur plage de cellules

Pas compris ce que fait ton code. Et, si tu joignais un fichier.

J'essaie de t'aider avec mes maigres connaissances.

Cordialement,

Cathodique.

 

[chifounou]

Re : VBA évènement sur plage de cellules

Après pas mal d'acharnement, j'ai pu me débrouiller. Merci encore pour la main tendue