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

Création wordart à partir d'une liste

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 !

christian.bedere

XLDnaute Occasionnel
Bonjour à vous tous !!

J'ai une liste située dans une base de données, et j'aimerai, en fonction de la ligne sélectionnée, créer un wordart qui répertorie les uns au dessous des autres les prenoms saisis côte à côte ds la bdd.
Pourriez vous me soumettre le code d'une macro pour créer ceci automatiquement et ajuster au format comme dessiné en jaune sur l'exemple ??

Je vous remercie et vous souhaite une bonne journée

christian
 
Re : Création wordart à partir d'une liste

BonjourUne ébauche
Code:
Sub Macro1()   Sheets("Base").Select    nom = Range("b2")        ActiveSheet.Shapes.AddTextEffect(msoTextEffect11, nom, "Impact", 36#, _        msoFalse, msoFalse, 311.25, 179.25).Select    Selection.Cut    Sheets("Bâtiment 1").Select    Range("D33").Select    ActiveSheet.Paste        Sheets("Base").Select    nom = Range("c2")        ActiveSheet.Shapes.AddTextEffect(msoTextEffect11, nom, "Impact", 36#, _        msoFalse, msoFalse, 311.25, 179.25).Select    Selection.Cut    Sheets("Bâtiment 1").Select    Range("D34").Select    ActiveSheet.Paste   End Sub
edit : je comprends rien ya des "
partout :
 
- 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

K
Réponses
2
Affichages
653
K
D
Réponses
2
Affichages
998
C
Réponses
1
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…