Discussion :

[Over.Salsh]

bonjour,

me revoilà avec un problème que je n'arrive pas a résoudre lors de l'édition d'un courrier, j'ai créé un signet "Imprimecourrier" pour me permettre de sélectionner une partie du texte que je désire imprimer.

je désire utiliser une macro qui me permettra d'imprimer le texte contenu dans le signet "Imprimecourrier".

mais je ne sais pas comment écrire cette macro.

si qu'un aurait la gentillesse de m'orienter vers une solution.

merci d'avance.

[clementmarcotte]

Bonjour,

Même réponse que pour:

http://www.developpez.net/forums/d14...e-seule-macro/

sauf pour la partie relative aux trois-quarts du code qui dépend de l'imprimante.

Dans l'aide de VBA, Signet veut dire Bookmark

[Over.Salsh]

un code comme celui-ci pourrait-il fonctionner ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub Macro()
'
' Macro impression signet "Imprimecourrier"
'
    Application.PrintOut FileName:="", Range:=ActiveDocument.Bookmarks("Imprimecourrier"), Item:= _
        wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
        wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
        PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
End Sub

[Heureux-oli]

Salut,

Même en changeant pour renvoyer un range avec ton signet, le code génère un erreur.

Ce qui peut fonctionner, c'est en deux étapes, la première tu sélectionnes le contenu du signet.
Et ensuite, tu imprimes la sélection.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Activedocument.Bookmarks("signet").Range.Select
Application.PrintOut FileName:="", Range:=wdPrintSelection, Item:= _
        wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
        wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
        PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0

[Over.Salsh]

salut,

je pense avoir résolut mon problème, mais je dois faire encore quelques essaies quand j'aurais un moment.

je posterais le code une fois que j'aurais fais la vérification. à suivre ...