Imprimer un powerpoint en mode visionneuse

Fermé
=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004 - 3 juin 2004 à 18:20
=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004 - 7 juin 2004 à 14:22
Bonjour, bonjour,

une petite question en passant :

ou puis-je trouver un programme (script, Visual Basic etc.) pour ajouter un bouton d'action "Imprimer la presentation" dans .pps ?
Cela est-il possible ?

Merci d'avance !

=numa=>
A voir également:

5 réponses

=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004
4 juin 2004 à 15:12
ma question est toujours d'actualité... je l'ai postée hier ;))

y a t il quelqu'un pour me dépanner d'un conseil ?

en fait, c'est pour le taf, et c'est un besoin assez urgent

d'avance un énÔrme merci !

=numa=> promet d'etre éternellement reconnaissant
0
=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004
4 juin 2004 à 15:13
juste un détail, je suis sur PowerPoint 2000

=numa=>
0
g Messages postés 1262 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 15 mai 2017 575
4 juin 2004 à 18:54
Bonjour,
Oui c'est possible d'avoir un bouton "Imprimer" lié à une macro.
Cela fonctionnera sans problème pour les diapos passés sur un micro équipé de PowerPoint, mais je ne suis pas sur que cela fonctionne sur les micros équipés seulment de le visiooneuse.
De plus il risque d'y avoir problème si le type d'imprimante diffère.
Le code à attribuer au bouton est :

Private Sub CommandButton1_Click()
With ActivePresentation.PrintOptions
.RangeType = ppPrintAll
.NumberOfCopies = 1
.Collate = msoTrue
.OutputType = ppPrintOutputSlides
.PrintHiddenSlides = msoTrue
.PrintColorType = ppPrintColor
.FitToPage = msoFalse
.FrameSlides = msoFalse
.HandoutOrder = ppPrintHandoutHorizontalFirst
.ActivePrinter = "HP DeskJet 690C"
End With
ActivePresentation.PrintOut
End Sub

Il conviendra de modifier la désignation de l'imprimante : "HP DeskJet 690C"

Bonne continuation.

http://perso.wanadoo.fr/gerard.g
0
=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004
7 juin 2004 à 12:06
Merci ca m'a l'air d'être exactement ce que je cherche !!

Peux tu m'aider pour la mise en place de la macro et du bouton d'action, je ne m'en sors pas !

=numa=> balourd en Visual Basic ;)
0
g Messages postés 1262 Date d'inscription vendredi 23 avril 2004 Statut Membre Dernière intervention 15 mai 2017 575
7 juin 2004 à 14:18
Communique moi ton @ je te ferai parvenir un exemple.

http://perso.wanadoo.fr/gerard.g
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
=numa= Messages postés 17 Date d'inscription mercredi 14 avril 2004 Statut Membre Dernière intervention 7 juin 2004
7 juin 2004 à 14:22
oki doki et encore merci :p

=numa=> manuman51@hotmail.com
0