Présentation macro excel

Bonjour,

Afin de reprendre les données présentes sur plusieurs feuilles de mon classeur sur un récap, j'ai executé cette macro :

Sub Assembler()
Dim i As Long, j As Long
Worksheets("Recap").Select
For i = 2 To Worksheets.Count - 0
j = Range("A65536").End(xlUp).Row + 1
With Worksheets(i)
Cells(j, 1).Value = .Range("B3").Value
Cells(j, 2).Value = .Range("B4").Value
Cells(j, 3).Value = .Range("B5").Value
Cells(j, 4).Value = .Range("B6").Value
Cells(j, 5).Value = .Range("B7").Value
End With
Next
End Sub

Ca fonctionne bien, les données présentes dans mes feuilles apparaissent bien ça donne ça :

Appartement 113 257 243 total TAUX Occupation
Janvier 31 15 29 30 105 84,68%
Février 28 26 28 19 101 90,18%
Mars 15 31 31 10 87 77,68%
Avril 0 30 30 0 60 50,00%
Mai 0 12 31 0 43 34,68%

Moi je voudrais ça :

TEMPORAIRES
Arc en Ciel Janvier Février
113 31
127 ...
243 ....
257
TOTAL
Taux de remplissage


Comment faire???
J'ai déjà passé pas mal de temps à trouver cette macro et je desespère.....

J'espère que c'est assez clair.....

Merci à tous les VBistes pour votre aide.

Ccyle