Liste dynamique Verticale copiée en honrizontale dynamique

[Homer75]

Bonjour à tous !!!

Voila mon souci:

j'ai une liste dans une feuille qui est de facon verticale.

je souhaite copier cette liste dans une autre feuille mais cette fois ci honrizontalement. via une peite macro

il existe un copier/coller qui fait cette manip...sauf que moi ma liste en feuille CODE est dynamique: elle peut changer...et donc ma liste honrizontale doit changer aussi instantanement !!!

Voici un fichier avec mon problème.

Merci d avance pour votre aide

 

[mth]

Re : Liste dynamique Verticale copiée en honrizontale dynamique

Bonjour,

Un essai avec ce code:

Sub Macro1()
Dim lig As Integer
lig = Sheets("Code").Range("A65530").End(xlUp).Row
 
    Sheets("Code").Range("A5:A" & lig).Copy
    Sheets("Resultat").Range("B4").PasteSpecial Paste:=xlPasteAll, Transpose:=True
    
End Sub

Bon après-midi,

mth

 

[Homer75]

Re : Liste dynamique Verticale copiée en honrizontale dynamique

comment dire .......

TU ES GENIAL !!!!!!!

😀😀😀

Merci mille fois !!!!

Bonne soirée à toi et bon courage

 

[BOISGONTIER]

Re : Liste dynamique Verticale copiée en honrizontale dynamique

Bonjour,

Sélectionner B5:AK5
=TRANSPOSE(Code!A5:A40)
Valider avec maj+ctrl+entrée


JB