Discussion :

[Baluteaud]

Bonjour,

Je n'arrive pas mettre une donnée variable dans une cellule comme par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Not Intersect([C1:C20], Target) Is Nothing And Target.Count = 1 Then
   code   
End If

fonctionne bien

Remplacer le 20 par une variable car le numéro de ligne est différents suivant les cas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Not Intersect([C1:C" & Ligne & "], Target) Is Nothing And Target.Count = 1 Then
   code   
End If

ne fonctionne pas, erreur 424

J'ai mis en pièce jointe un fichier Test.

Merci de votre aide et en attente d'une solution,
Jean-Michel