Impresion de la page en cours

[Ljc]

Bonjour

Dans une feuille qui contient plusieurs pages,je souhaiterais imprimer la page sur laquelle je travaille.
Peut etre qu'il existe une macro
Actuellement,je suis obliger d'inscrire le n° de page pour l'imprimer

Merci pour les réponses

 

[JMG]

Bonjour Ljc,

Essaye ceci dans une procédure

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

A+ ExcelementVotre JMG

 

[Ljc]

Re: Impression de la page en cours

A Jmg

Merci pour ta réponse, j'ai essayé ta macro mais comme je ne suis pas un pro,ça ne fonctionne pas
Peut tu me la décrire en totalité
Merci encore

A+

 

[JMG]

Re: Impression de la page en cours

Bonjour Ljc,

tu vas sur VBA par les touche ALT + F11

tu insere un module et tu ecris

sub imprimefeuilleencours ()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
end sub

tu retourne sur ta feuille tu insere un bouton d'action auquel tu affecte ta macro

imprimefeuilleencours

A+ JMG

 

[Ljc]

Re: Impression de la page en cours

A JMG

Ta Macro fonctionne bien,mais elle imprime toutes les pages de la feuille alors que je ne voudrais imprimer que la page en cours

Merci à toi
A+ Ljc

 

[Arpad]

Re: Impression de la page en cours

Sub Imprimer()
'
' Imprimer Macro

'Impression des feuilles Récap et Résultats
Sheets(Array("Résultats", "Récap")).Select
Sheets("Récap").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Sheets("Résultats").Select
End Sub


Voilà comment je'imprime deux feuilles, que j'ai intitulé Recap et Résultats et que j'active par un bouton de commande

 

[Ljc]

A tous merci pour vos conseils

Ce forum est super

LJC
A+