Bonjour Tout le monde

Je vous expose ma problématique :

je fais appel à une sub qui me copier une 40aine lignes en dessous celle-ci avec un décalage constant.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
    Rows("77:116").Copy
    Rows("117:117").Insert Shift:=xlDown
    Application.CutCopyMode = False
Par rapport à ces mêmes lignes, j'ai une fonction personnalisé de type : Function Blabla(X As Range, ParamArray Lgt())
Le paramArray prend en compte la première ligne soit la ligne 77 (E77:AJ77), j'aurais voulu incrémenté mon ParamArray de tel sorte que Lgt() = E77:AJ77,E118:AJ118 soit un décalage de 41 lignes etc sans avoir à retoucher la formule manuellement... est ce possible ?

Sachant qui faudrait que j'inclus un compteur du nombre d'utilisation dans ma macro pour définir le nombre de paramArray a rajouter non ?

Merci pour votre aide dans tous les cas.