Bonjour,

suite à un message d'erreur (procédure trop grande)
je cherche à définir plusieurs plages de cellules dans le bout de code ci dessous.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
If Not Intersect(Target, Me.Range("B" & ln4, "B" & ln2) Is Nothing Then
j'aurai souhaité pouvoir définir comme ceci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
If Not Intersect(Target, Me.Range("B" & ln4, "B" & ln2) or ("E" & ln4, "E" & ln2) or ("H" & ln4, "H" & ln2) Is Nothing Then
mais bien entendu ça ne fonctionne pas

Merci d'avance pour votre aide.
Sophie