Bonjour le fil, bonjour le forum,
Tu déclares : Dim Vector(51)
Tu alimentes : Vector(0) = ..., Vector(1) = ..., Vector(51) = ...
Pour renvoyer en colonne :
Range("A1").Resize(51).Value = Application.Transpose(Vector)
Dans un tableau à deux colonnes, seule la seconde est redimensionnable