Thrall72
XLDnaute Nouveau
Bonjour à tous,
Tout d'abord je tenais à féliciter les membres réguliers de ce forum, ayant souvent traîné sur le forum suite à des recherches google, eh bien ce forum est très bien tenu et dispose de personne très aimable et compétente
Je viens ici car j'ai un problème réellement bizarre.
Il s'agit d'un fichier destiné à la réalisation de fiche de réglage au format PDF. Elles sont utilisés pour accompagner les opérateurs de mon entreprise.
Pour créer une fiche c'est très simple, il suffit de copier une colonne de l'onglet "Données" et de remplacer le contenu de la colonne C par cette dernière. Une macro événementielle de cette même feuille s'occupe d'actualiser les photos des onglets "FR1-" à "FR4-", tout cela via l'utilisation de l'objet Picture (pour ma part ce code m'est complètement obscur, je ne connais pas du tout cet objet donc si vous avez des liens je suis preneur, mais pour autant il fonctionne correctement) tandis que le texte se réfèrent à la colonne C de l'onglet "Données"
Une fois cela fait, il suffit d'imprimer les onglets "FR1-" à "FR4-" à l'aide d'une imprimante PDF, PDFCreator est très bien puisqu'il est de plus manipulable en VBA.
Voilà pour le principe, qui est validé, ne reste plus qu'à mettre en place une macro qui boucle sur tous nos articles pour créer les fiches de réglages associés de manière automatique.
Pour ce qui est de l'impression en PDF, je vous avouerai que je ne me suis guère embêter puisque je suis tomber totalement par hasard sur une macro tout prête, qui marche du tonnerre et est extrêmement complète ( Lien supprimé )
Et voici la fameuse boucle :
Dans un premier temps je me contente de faire la fiche de réglage 1, le principe ne différant pas pour les autres fiches. Et la macro est on ne peut plus simple, elle copie une colonne, la copie dans la colonne C, la macro événementielle se déclenche mettant à jour la photo et j'appelle la fonction de création de PDF de la macro que j'ai trouvé.
On en vient au problème, eh bien la photo se met à jour de manière non régulière (pour pas dire jamais). C'est à dire que ne serait-ce que pour ces 4 articles, vous n'aurez jamais les 4 PDFs avec la bonne photo. Et j'ai tout essayé pour y palier. Vérifié que la macro événementielle se faisait bien, mettre un temps d'attente avant impression, recalculer la feuille, se mettre sur la feuille "FR1-", etc
L'UNIQUE manière que j'ai jusque là trouver pour que chaque PDF soit bien correct, est de mettre un point d'arrêt sur l'appel de la fonction de création de PDF, et je suis sérieux, ça marche du tonnerre. Il faut le voir pour le croire, mais du coup la je suis en manque d'idée total sur la cause du problème et donc de comment le résoudre.
Voici un lien vers un ptit zip d'un dossier avec le fichier en question et les sources nécessaires
https://www.mediafire.com/?7ohp4ld200yadpv
Je vous remercie d'avance pour le temps que vous prendrez pour m'aider, et désolé pour le pavé mais j'espère avoir été clair et le plus complet possible car cela me semble important
Bonne appétit !
Tout d'abord je tenais à féliciter les membres réguliers de ce forum, ayant souvent traîné sur le forum suite à des recherches google, eh bien ce forum est très bien tenu et dispose de personne très aimable et compétente
Je viens ici car j'ai un problème réellement bizarre.
Il s'agit d'un fichier destiné à la réalisation de fiche de réglage au format PDF. Elles sont utilisés pour accompagner les opérateurs de mon entreprise.
Pour créer une fiche c'est très simple, il suffit de copier une colonne de l'onglet "Données" et de remplacer le contenu de la colonne C par cette dernière. Une macro événementielle de cette même feuille s'occupe d'actualiser les photos des onglets "FR1-" à "FR4-", tout cela via l'utilisation de l'objet Picture (pour ma part ce code m'est complètement obscur, je ne connais pas du tout cet objet donc si vous avez des liens je suis preneur, mais pour autant il fonctionne correctement) tandis que le texte se réfèrent à la colonne C de l'onglet "Données"
Une fois cela fait, il suffit d'imprimer les onglets "FR1-" à "FR4-" à l'aide d'une imprimante PDF, PDFCreator est très bien puisqu'il est de plus manipulable en VBA.
Voilà pour le principe, qui est validé, ne reste plus qu'à mettre en place une macro qui boucle sur tous nos articles pour créer les fiches de réglages associés de manière automatique.
Pour ce qui est de l'impression en PDF, je vous avouerai que je ne me suis guère embêter puisque je suis tomber totalement par hasard sur une macro tout prête, qui marche du tonnerre et est extrêmement complète ( Lien supprimé )
Et voici la fameuse boucle :
Code:
Dim i As Integer
Dim Str_Reference As String
i = 5
Do While Worksheets("Données").Cells(7, i) <> ""
If Worksheets("Données").Cells(7, i) <> "" Then
Str_Reference = Worksheets("Données").Cells(7, i)
Columns(i).Copy
Columns(3).Select
ActiveSheet.Paste
Call fctPDFCreator_Print(Worksheets("FR1-"), Str_Reference, ActiveWorkbook.Path + "\PDF\")
End If
i = i + 1
LoopDans un premier temps je me contente de faire la fiche de réglage 1, le principe ne différant pas pour les autres fiches. Et la macro est on ne peut plus simple, elle copie une colonne, la copie dans la colonne C, la macro événementielle se déclenche mettant à jour la photo et j'appelle la fonction de création de PDF de la macro que j'ai trouvé.
On en vient au problème, eh bien la photo se met à jour de manière non régulière (pour pas dire jamais). C'est à dire que ne serait-ce que pour ces 4 articles, vous n'aurez jamais les 4 PDFs avec la bonne photo. Et j'ai tout essayé pour y palier. Vérifié que la macro événementielle se faisait bien, mettre un temps d'attente avant impression, recalculer la feuille, se mettre sur la feuille "FR1-", etc
L'UNIQUE manière que j'ai jusque là trouver pour que chaque PDF soit bien correct, est de mettre un point d'arrêt sur l'appel de la fonction de création de PDF, et je suis sérieux, ça marche du tonnerre. Il faut le voir pour le croire, mais du coup la je suis en manque d'idée total sur la cause du problème et donc de comment le résoudre.
Voici un lien vers un ptit zip d'un dossier avec le fichier en question et les sources nécessaires
https://www.mediafire.com/?7ohp4ld200yadpv
Je vous remercie d'avance pour le temps que vous prendrez pour m'aider, et désolé pour le pavé mais j'espère avoir été clair et le plus complet possible car cela me semble important
Bonne appétit !
Dernière édition:
