cathodique
XLDnaute Barbatruc
Bonjour,
M'initiant aux variables tableaux, j'ai pris un bout de code sur le site de Boisgontier ci-dessous.
j'ai rajouté les 2 dernières lignes de code pour transférer le tableau c sur la feuille. Je n'ai pas compris et pas trouvé d'explications. Pour l'une les données sont numériques comme initialement et pour l'autre les données sont considérées comme du texte.
En vous remerciant par avances.
M'initiant aux variables tableaux, j'ai pris un bout de code sur le site de Boisgontier ci-dessous.
VB:
Sub ConcatTableau()
Cells.ClearContents
a = Array(1, 2, 3, 4)
b = Array(5, 6, 7, 8, 9)
c = Split(Join(a, ",") & "," & Join(b, ","), ",")
[A1].Resize(UBound(c) + 1) = Application.Transpose(c) 'chiffres alignés à droite
'------------------------------------------------------------------------------------------------------------------------------
[A12].Resize(1, UBound(c) + 1) = c 'chiffres alignés à gauche avec triangle en haut gauche de la cellule
[A13].Resize(1, UBound(c) + 1) = Application.Transpose(Application.Transpose(c)) 'chiffres alignés à droite
'------------------------------------------------------------------------------------------------------------------------------
End Sub
En vous remerciant par avances.