Excel VBA copier coller plusieurs cellule

Résolu/Fermé
gunbafo Messages postés 55 Date d'inscription jeudi 16 juillet 2009 Statut Membre Dernière intervention 18 février 2011 - 23 déc. 2009 à 10:29
Le Pingou Messages postés 12035 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 1 avril 2024 - 24 déc. 2009 à 11:42
Bonjour,

Je souhaiterais copier coller une plage (de ligne variable et de 18 colonnes dans feuille A) grâce à un bouton intégrer dans un userform vers une feuille B.
Mais le problème c'est que pour réduire la taille de la plage (dans la feuille B), je voudrais que plusieurs cellule de la même ligne (feuille A) soient copiés dans la même cellule (feuille B)

Ex:
feuille A:
A1=homme
B1=grand
C1=riche
D1=vieux
C1=radin
avec plusieurs ligne de ce type

pour obtenir sur la feuille B via un bouton:
A1= homme
grand
riche (avec les info coller en revenant à la ligne dans la même cellule)
B1= Vieux
C1=radin

J'ai un peu de mal à écrire un code correspondant à ce problème
Merci de l'aide que vous pouvez m'apporter

6 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
23 déc. 2009 à 18:26
bonjour ou Re
With Sheets(1)
Sheets(2).Range("A1") = .Range("A1") & vbLf & .Range("B1") & vbLf & .Range("C1")
End With
1