Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mettre plusieurs cellules de résultat dans une seule forme

  • Initiateur de la discussion Initiateur de la discussion libellule85
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

libellule85

XLDnaute Accro
Bonjour le forum,

Je ne sais pas si cela est possible mais j'aimerais mettre le résultat de plusieurs cellules dans une seule forme par exemple dans le rectangle coin arrondi.

il faudrait que cela apparaisse comme ceci :

résultat du A1
résultat du A2
résultat du A3

D'avance merci pour votre aide
 

Pièces jointes

Re : Mettre plusieurs cellules de résultat dans une seule forme

Bonjour à tous

Fonctionne sur le fichier exemple
(nécessitera des adaptations si plusieurs shapes sur la feuille)
Code:
Sub test()
Dim sStr$
sStr = Join(Application.Transpose(Range("A1:A3").Value), vbCrLf)
ActiveSheet.Shapes(1).TextFrame.Characters.Text = sStr
End Sub

EDITION: Bonjour pierrejean 😉, Bonjour Paf (déjà deux solutions par macro 😉 )
 
Dernière édition:
Re : Mettre plusieurs cellules de résultat dans une seule forme

Bonjour libellule

Vois si cela te convient
NB: fonctionne au changement de A1 ou A2 Ou A3
et réalisé avec la complicité de l'enregistreur de macro

Edit: Salut Staple (et BRAVO)
 

Pièces jointes

Re : Mettre plusieurs cellules de résultat dans une seule forme

Bonjour

pas trouvé de solution plus simple:

En C1 (par exemple):
-dans le format de cellule cocher renvoyer à la ligne automatiquement
-entrer la formule: =A1&CAR(10)&A2&CAR(10)&A3
-Sélectionner le rectangle coin arrondi, puis dans la barre de formule entrer : =C1

autre solution par macro éventuellement

A+

Edit: Bonjour Staple1600, pierrejean
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
283
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…