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

XL 2013 [Résolu] Isèrer un texte par boucle dans des signets Word

  • Initiateur de la discussion Initiateur de la discussion Lone-wolf
  • 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 !

Lone-wolf

XLDnaute Barbatruc
Bonjour à tous 🙂

D'après un exemple trouvé sur Developpez.com, j'éssaie d'inserer par boucle du texte à partir d'Excel; donc 12 lignes - 12 signets déjà créés. Si je met doc.BookMarks("Ligne1") à 12, pas de souci, mais dans une boucle, la macro tourne en rond. Ici j'ai créé un tableau pour faire un nouveau test, mais rien à faire. J'ai aussi fait un test en créant les signets par macro, mais à la fin, au lieu d'avoir 12 lignes(ou paragraphes), il y en a que 6.

VB:
   With Feuil1
   derlig = .Range("a" & Rows.Count).End(xlUp).Row
   tablo = .Range("a1:a" & derlig)
    For i = LBound(tablo, 1) To UBound(tablo, 1)
    doc.Bookmarks("Ligne" & i).Range.Text = tablo(i, 1)
    Next i
  End With

Auriez-vous une idée?
 
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
10
Affichages
496
Réponses
2
Affichages
1 K
Réponses
3
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…