Bonjour à tous,
Dans une macro un peu complexe, j'aimerais utiliser la copie directe d'un tableau dans une plage de cellules afin d'éviter le bouclage sur les cellules et les lignes/colonnes du tableau. Pour me faire la main, j'ai fait une macro basique mais qui ne donne pas les résultats voulus. Je remplis un tableau avec les chiffres de 1 à 10. En sortie, j'aimerais avoir en colonne 5 toutes les valeurs du tableau, mais ma macro ne renvoie que la 1ère valeur (3) à chaque ligne. Savez-vous me dire où est l'erreur ?
Dans une macro un peu complexe, j'aimerais utiliser la copie directe d'un tableau dans une plage de cellules afin d'éviter le bouclage sur les cellules et les lignes/colonnes du tableau. Pour me faire la main, j'ai fait une macro basique mais qui ne donne pas les résultats voulus. Je remplis un tableau avec les chiffres de 1 à 10. En sortie, j'aimerais avoir en colonne 5 toutes les valeurs du tableau, mais ma macro ne renvoie que la 1ère valeur (3) à chaque ligne. Savez-vous me dire où est l'erreur ?
Code:
Sub titi()
Dim TabTiti(1 To 10) As Variant
Dim PlagePourColler As Range
TabTiti(1) = 3
TabTiti(2) = 5
TabTiti(3) = 2
TabTiti(4) = 9
TabTiti(5) = 1
TabTiti(6) = 4
TabTiti(7) = 8
TabTiti(8) = 6
TabTiti(9) = 7
TabTiti(10) = 10
Set PlagePourColler = Range(Cells(1, 5), Cells(10, 5))
PlagePourColler.Value = TabTiti
End Sub