Re-Salut,
Dans le code de la macro, tu as :
While Cells(i, 1) <> ""
tableau(i) = Cells(i, 1)
i = i + 1
Wend
Par exemple, si tes données sont stockées dans la 2eme colonne, il faut mettre :
While Cells(i, 2) <> ""
tableau(i) = Cells(i, 2)
i = i + 1
Wend
Cells est utilise comme ça :
Cells(Numero de la ligne, numero de la colonne)