Bouton d'action imprimer sous PowerPoint [Résolu]
jeromeprevost62
- Messages postés
- 3
- Date d'inscription
- mercredi 22 mars 2006
- Dernière intervention
- 23 mars 2006
- Messages postés
- 3
- Date d'inscription
- mercredi 22 mars 2006
- Dernière intervention
- 23 mars 2006
A voir également:
- Powerpoint bouton action
- Bouton action powerpoint - Meilleures réponses
- Bouton imprimer php - Meilleures réponses
- Création d'un bouton avec Action CTRL+I ✓ - Forum - Javascript / DHTML
- Bouton et Action Script ✓ - Forum - Flash
- Page contact leurs boutons leurs actions ✓ - Forum - Flash
- Transformer un clip en bouton par action script ✓ - Forum - Flash
- Imprimer une page sans ses boutons - Conseils pratiques - Javascript
2 réponses
Meilleure réponse
- Messages postés
- 55
- Date d'inscription
- jeudi 28 juillet 2005
- Dernière intervention
- 23 mars 2006
Salut,
Ca ne me parait pas bien compliqué :
- tu créees ton tableau "vierge" dans une diapo que tu masques (diapo 99 par exemple)
- tu enregistres une nouvelle macro (Outil/macro/nouvelle macro)
- tu es en mode enregistrement de ta macro. Fichier/imprimer et tu entres "99" dans le champ "diapositive", en pensant à cocher "imprimer les diapositives masquées"
- tu stoppes ton enregistrement de macro
- tu peux aller voir à quoi elle ressemble (Outils/macros/macros puis modifier)
- ca doit ressembler à ca :
Sub Macro1()
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add Start:=99, End:=99 'ici les pages à imprimer
End With
.NumberOfCopies = 1
.Collate = msoTrue
.OutputType = ppPrintOutputSlides
.PrintHiddenSlides = msoTrue 'ici on précise d'imprimer les diapos masquées
.PrintColorType = ppPrintBlackAndWhite
.FitToPage = msoFalse
.FrameSlides = msoFalse
.ActivePrinter = "RICOH Aficio 3224C RPCS"
End With
ActivePresentation.PrintOut
End Sub
Il ne te reste plus qu'a associer ta macro à un bouton...
Ca ne me parait pas bien compliqué :
- tu créees ton tableau "vierge" dans une diapo que tu masques (diapo 99 par exemple)
- tu enregistres une nouvelle macro (Outil/macro/nouvelle macro)
- tu es en mode enregistrement de ta macro. Fichier/imprimer et tu entres "99" dans le champ "diapositive", en pensant à cocher "imprimer les diapositives masquées"
- tu stoppes ton enregistrement de macro
- tu peux aller voir à quoi elle ressemble (Outils/macros/macros puis modifier)
- ca doit ressembler à ca :
Sub Macro1()
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add Start:=99, End:=99 'ici les pages à imprimer
End With
.NumberOfCopies = 1
.Collate = msoTrue
.OutputType = ppPrintOutputSlides
.PrintHiddenSlides = msoTrue 'ici on précise d'imprimer les diapos masquées
.PrintColorType = ppPrintBlackAndWhite
.FitToPage = msoFalse
.FrameSlides = msoFalse
.ActivePrinter = "RICOH Aficio 3224C RPCS"
End With
ActivePresentation.PrintOut
End Sub
Il ne te reste plus qu'a associer ta macro à un bouton...
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
117 internautes nous ont dit merci ce mois-ci
- Messages postés
- 3
- Date d'inscription
- mercredi 22 mars 2006
- Dernière intervention
- 23 mars 2006
Salut, c vraiment sympa.
Mais comment fait on pour séparer les noms des différentes diapo
.Add Start:=99, End:=99 99,100 ou 99.100 ou ????????
et pui j'ai des problémes pour faire le bouton en question car il n'y a que des boutons genre Acceuil, Suivant,...
Et est-ce que cela fonctionnera avec toute les imprimantes?
Je te remercie énormèment... .
Mais comment fait on pour séparer les noms des différentes diapo
.Add Start:=99, End:=99 99,100 ou 99.100 ou ????????
et pui j'ai des problémes pour faire le bouton en question car il n'y a que des boutons genre Acceuil, Suivant,...
Et est-ce que cela fonctionnera avec toute les imprimantes?
Je te remercie énormèment... .
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
117 internautes nous ont dit merci ce mois-ci
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.