n° de ligne

[Gull]

Bonjour, j'aurais voulu savoir comment faire pour récupérer le n° de la ligne lorsque IF est True. Je donne mon code
Dim a As Date
For each a In Worksheet("MaFeuille").Columns("q")
If a>10/10/2003 Then
ActiveSheet.Range("c"& monnumérodeligne).Select
Selection.Copy
worksheet("AutreFeuille").Range("a"& monnumérodeligne).Paste
End If
Next a
Quelqu'un pourrait-il me donner une formule pour récupérer "monnumérodeligne"
Par avance merci

 

[Jeannot45]

Bonjour,

tu peux compléter ta syntaxe avec :

ActiveSheet.Range("c"& ACTIVECELL.ROW).Select

Bon courage

a+

Jeannot

 

[Gull]

Merci du tuyau. A+