Création d'un PDF dans une boucle For [Fermé]

Signaler
Messages postés
4
Date d'inscription
vendredi 18 décembre 2015
Statut
Membre
Dernière intervention
28 décembre 2015
-
Messages postés
4
Date d'inscription
vendredi 18 décembre 2015
Statut
Membre
Dernière intervention
28 décembre 2015
-
Bonsoir,
J'essaye de créer des PDF d'une zone de texte générée par une BDD mais j'ai un problème avec ce code qui fonctionne quand je l'exécute PAS à PAS mais qui disjoncte totalement (Mélange des lignes) quand je le lance avec un bouton.
à noter que ce code alimente une zone de texte dans une feuille EXCEL.
Ci-dessous un code simplifié similaire à celui que j'utilise :

Sub test()

For Ligne = 3 To 5
Range("L2") = Cells(Ligne, 8)

Range("M2") = Cells(Ligne, 9)
Range("n2") = Cells(Ligne, 10)

'création du pdf

chemin = ThisWorkbook.Path
nomFichier = Range("L2") & Range("M2")

chemin = chemin & "\" & nomFichier

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Next Ligne
End Sub

Merci pour votre aide :)
Anne-Marie.

1 réponse

Messages postés
4
Date d'inscription
vendredi 18 décembre 2015
Statut
Membre
Dernière intervention
28 décembre 2015

j'ai complété dans les fonctions zone de texte : linkedcell (la cellule correspondante ). Sauf que celle-ci ne se met pas à jour correctement quand je lance la macro à partir d'un bouton.