Bonjour a tous,

voila mon probleme

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Worksheets("Référence").Activate
 
    ActiveCell.CurrentRegion.EntireRow.Select
    nbligneR = Selection.Rows.Count
 
 
    Range("R2").Select
    ActiveCell.FormulaR1C1 = "=CONCATENATE(RC[-11],RC[-10],RC[-9],RC[-8])"
    Range("R2").Select
    Selection.AutoFill Destination:=Range("R2:R1328")
je souhaite avoir a la place de 1328 la valeur de ma variable nbligneR.

Pouvez vous m'aider

Merci