changer d alignement

[bono]

bonjour

j espere que tout le monde est rentré de la messe , car j aimerais qu il y est quelqu un pour repondre à ma question !
j aimerais que ma macro au lieu de me mettre toute mes données en colonne puisse le faire sur une ligne , j ai les neurones un peu fatiguées en ce dimanche ensoleilé
merci a tous et bonne journée

 

[Zon]

Salut,

A partir de ce que tu obtiens on peut écrire

dim Plage as range

set plage=range([A6],[A65536].end(xlup))
with plage
.cells(1,1).resize(1,rows.count)=application.transpose(.value)
end with

On pourrait le fiare directement mais il faudriat voir le code de ta procédure.

A+++

 

[bono]

merci ZON

je vais essayer cela , je pense que cela devrait allé
bonne journée