Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
geo
Bonjour
-----Message d'origine----- Bonjour,
Je voudrais trouver une petite macro qui imprime la page en cours et la page
suivante uniquement.
Sub Macro1() Dim N1 As Integer Dim N2 As Integer N1 = Selection.Information(wdActiveEndPageNumber) N2 = N1 + 1 Application.PrintOut _ Range:=wdPrintRangeOfPages, _ Pages:=N1 & "-" & N2 End Sub
Bonjour
-----Message d'origine-----
Bonjour,
Je voudrais trouver une petite macro qui imprime la page
en cours et la page
suivante uniquement.
Sub Macro1()
Dim N1 As Integer
Dim N2 As Integer
N1 = Selection.Information(wdActiveEndPageNumber)
N2 = N1 + 1
Application.PrintOut _
Range:=wdPrintRangeOfPages, _
Pages:=N1 & "-" & N2
End Sub
Je voudrais trouver une petite macro qui imprime la page en cours et la page
suivante uniquement.
Sub Macro1() Dim N1 As Integer Dim N2 As Integer N1 = Selection.Information(wdActiveEndPageNumber) N2 = N1 + 1 Application.PrintOut _ Range:=wdPrintRangeOfPages, _ Pages:=N1 & "-" & N2 End Sub
Lasperches Denis
Bonjour
Je voudrais trouver une petite macro qui imprime la page en cours et la page suivante uniquement.
Un début de piste, je suis pas fort en macro mais j'ai fait ça juste avec l'enregistreur :
Sub ImpPeC() ' ' ImpPeC Macro ' Macro enregistrée le 30/01/2003 par Lasperches Denis ' Application.PrintOut FileName:="", Range:=wdPrintCurrentPage, Item:= _ wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _ Collate:=True, Background:=True, PrintToFile:úlse, PrintZoomColumn:=0, _ PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0 End Sub
Faudrait rajouter un petit quelque chose mais...
-- Petit Denis
Bonjour
Je voudrais trouver une petite macro qui imprime la page en cours et
la page suivante uniquement.
Un début de piste, je suis pas fort en macro mais j'ai fait ça juste avec
l'enregistreur :
Sub ImpPeC()
'
' ImpPeC Macro
' Macro enregistrée le 30/01/2003 par Lasperches Denis
'
Application.PrintOut FileName:="", Range:=wdPrintCurrentPage, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:úlse,
PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer le résultat d'une fusion et là je pense que ça ne doit pas marcher. Mais tu nous le diras.
--
A+
Bonjour olitoto
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer
le résultat d'une fusion et là je pense que ça ne doit pas marcher.
Mais tu nous le diras.
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer le résultat d'une fusion et là je pense que ça ne doit pas marcher. Mais tu nous le diras.
--
A+
Lasperches Denis
Salut geo wrote:
Bonjour Denis
Sub ImpPeC()
J'aime bien le nom de ta macro :-) Ça fait un nom pas trop long qui tient dans le bouton (barre) de ma palette
(boîte) de petites macros (aux petits oignons !!!) -- Petit Denis
Salut
geo wrote:
Bonjour Denis
Sub ImpPeC()
J'aime bien le nom de ta macro :-)
Ça fait un nom pas trop long qui tient dans le bouton (barre) de ma palette
(boîte) de petites macros (aux petits oignons !!!)
--
Petit Denis
J'aime bien le nom de ta macro :-) Ça fait un nom pas trop long qui tient dans le bouton (barre) de ma palette
(boîte) de petites macros (aux petits oignons !!!) -- Petit Denis
olitoto
Merci
la macro roule .....
A bientôt sans doute, je débute en VB
Olivier
"Geo" a écrit dans le message de news:
Bonjour olitoto
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer le résultat d'une fusion et là je pense que ça ne doit pas marcher. Mais tu nous le diras.
--
A+
Merci
la macro roule .....
A bientôt sans doute, je débute en VB
Olivier
"Geo" <Geo@sans.pub> a écrit dans le message de
news:uHWqhMVsEHA.2252@TK2MSFTNGP11.phx.gbl...
Bonjour olitoto
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer
le résultat d'une fusion et là je pense que ça ne doit pas marcher.
Mais tu nous le diras.
Au vu de ta deuxième question je me demande si tu ne voudrais pas imprimer le résultat d'une fusion et là je pense que ça ne doit pas marcher. Mais tu nous le diras.
