Dupliquer un tableau en modifiant une valeur

Bonjour

j'ai un tableau de 10 lignes avec une colonne de 10 id différents,

je souhaiterais répliquer 10 fois ce tableau avec chaque id unique

Si vous pouviez (une nouvelle fois !) m'aider

Merci beaucoup

Bonjour,
Un exemple à adapter.
Cdlt.

Public Sub DuplicateData()
Dim lastCol As Long, lastRow As Long, rw As Long, rngData As Range
    With ActiveSheet
        lastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
        lastRow = .Cells(.Rows.Count, 1).End(xlUp).Row
        Set rngData = .Cells(1).Resize(lastRow, lastCol)
        For rw = 13 To 130 Step 13
            .Cells(rw, 1).Resize(lastRow, lastCol).Value = rngData.Value
        Next rw
    End With
End Sub

Bonjour Jean-Eric

merci beaucoup, c'est exactement ce dont j'avais besoin.
Très sympa de votre part d'avoir pris du temps, cela va beaucoup m'aider.

Bonne journée.

j'ai été un peu vite, le tableau est bien dupliqué, mais

j'aurais souhaité qu'il le soit avec un id unique.

Matthieu

Bonjour,
Une petite mise à jour.
Cordialement.

Génial,

merci beaucoup