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.
Auriez-vous une idée?
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: