[WD-2003] Code VBA : Impression d'un passage "flottant" [Résolu]

[Yvouille]

Bonsoir,

J'ai posé une question similaire à la suite d'un de mes fils, mais comme je n'obtiens plus de réponse, je me permets d'indiquer cet ancien fil comme résolu et d'en recommencer un autre. J'espère ne pas faire "tout faux".

Je désirerais modifier le code inscrit dans le fichier ci-joint de manière à ce que ça imprime non pas la page 15, mais un texte "flottant", c'est à dire un texte pouvant se trouver déplacé en fonction de l'évolution de document. Par exemple serait-il possible d'imprimer, à l'aide de ce code, un texte se trouvant entre deux balises ?

A vous relire.

Yvouille

[Heureux-oli]

Salut,

Le premier problème va être la sélection du texte contenu entre te balises.

Word peut sans aucun problème n'imprimer qu'une portion de texte et pas une page entière.

[Yvouille]

Merci Oli pour ta réponse.

En fait mon fichier n'est qu'un exemple. Je pense que si tu peux me montrer comment mettre un passage quelconque entre deux balises puis d'indiquer au code VBA quelle est cette portion de texte à imprimer, je devrais m'en sortir afin de reproduire cela pour d'autres fichiers et/ou passages.

A te relire

Yvouille

[Heureux-oli]

Salut,

Si c'est ajouter des balises autour d'un texte pour imprimer ce qui est contenu dans les balises

Sélectionnes ce que tu souhiates imprimer et n'imprime que ce texte.

[Yvouille]

Salut Oli et merci pour ta réponse.

Ce n'est pas aussi simple.

Je dois créer une dizaine de procédures de travail et dans chacune d'elles, il y a un check-list à imprimer. Cette check-list peut se trouver à n'importe quel endroit de ces fichiers (une fois au début de la page 5, une fois entre la page 10 et 11, etc.) et être encore déplacées selon l'évolution du texte qui précède.

Comme à chaque utilisation de ces procédures il faudrait imprimer la check-list qui y est incluse, je cherchais à lier cette impression à un bouton placé en début de procédure. Un peu comme dans mon fichier exemple où la check-list à imprimer se trouve à la page 15 (mais d'ici quelques temps, lorsque j'aurai complété ou diminué cette procédure, cette check-list ne sera plus à la page 15).

Peux-tu encore m'aider ?

Cordialement.

Yvouille

[Heureux-oli]

Salut,

Met là dans un signet.

Tu sélectionnes ou récupères le contenu du signet pour l'imprimer.

[Yvouille]

Encore une fois merci pour ta réponse

Désolé, mais je ne sais pas faire ce que tu indiques. Ne pourrais-tu pas me fournir un exemple ?

A te relire.

Yvouille

[Heureux-oli]

Salut,

Supposons un signet S1 contanant un texte.

Ce code ne va imprimer que le contenu du signet :

Code :

1
2
ActiveDocument.Bookmarks(1).Range.Select
Application.PrintOut Range:=wdPrintSelection

[Yvouille]

Wow, génial ! Grâce à toi j'ai effectué un pas de géant - bien que je l'ai effectué tout lentement - et mon problème est ainsi résolu.

Merci infiniment pour ta précieuse aide.

Cordialement.

Yvouille