Discussion :

[pec]

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

[SfJ5Rpw8]

Code :

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

     Selection.AutoFill Destination:=Range("R2:R" & nbligneR )

[pec]

Merci !!!