afficher le contenu d'un tableau

[Ortnext]

Bonjour,

J'ai écrit une sub d'affichage qui prend en paramètre un tableau de double et un range.
je ne sais pas manipuler les ranges lorsqu'ils sont passés en paramètre, quelqu'un peut-il m'éclairer ?


Public Sub AfficheTab(aListCollect() As Double, aRange As Range)
Dim i As Integer
Set aRange = ThisWorkbook.Worksheets("Resultat ")
For i = 1 To UBound(aListCollect)
aListCollect(i) = aRange.Offset(i, 0).Value2
Next i

End Sub