Transposer une colonne en plusieurs lignes
Bonjour tout le monde,
Je sollicite votre aide dans l'espoir que quelqu'un trouve un solution à mon interrogation.
Pour l'instant j'ai très peu de connaissances dans Visual Basic.
Voilà j'explique mon sujet.
Je voudrais savoir comme transposer une colonne unique composée de "n" nombres, en lignes de 3 colonnes.
Exemples :
A---B---C--------------->--(macro)--->------A---B---C
1-----------------------------------------------1---2---3
2-----------------------------------------------4---5---6
3-----------------------------------------------7---8---9
4-----------------------------------------------...---...---n
5
6
7
8
9
n
En remerciant par avance les personnes qui prendront le temps de me répondre.
Bonne soirée.
Salut Anth,
Bienvenue chez nous,
une solution en VBA, à adapter à tes colonnes de données.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'
Dim tTab
'
iRow = Range("A" & Rows.Count).End(xlUp).Row
tTab = Range("A1:A" & iRow)
'
ITab = 0
'
For x = 1 To 3
iFlag = IIf(x = 3, iRow - ITab, Int(iRow / 3))
For y = 1 To iFlag
ITab = ITab + 1
Cells(y, x + 2) = tTab(ITab, 1)
Next
Next
'
End SubA+
Et une version sans macro ... (nombres ou mots, peu importe)