j' y revien encore ...
je souhaiterais faire un bouton "suivant" et "pr=E9c=E9dent"=20
dans l'aper=E7u avant impression, pouvoir me d=E9placer de=20
feuille en feuille au lieu de faire cela comme =E7a :
Sheets("feuil1").Select
ActiveWindow.SelectedSheets.PrintPreview
Sheets("feuil2").Select
ActiveWindow.SelectedSheets.PrintPreview
=20
etc...
un bouton suivant et pr=E9c=E9dent c'est tout '-(
merci
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
Frédéric Sigonneau
Bonsoir,
Pourquoi vouloir (re)faire des boutons qui existent déjà (en haut à gauche) dès lors que plusieurs feuilles sont sélectionnées quand la fenêtre d'aperçu est lancée ? Avec du code, tu peux obtenir cet affichage de cette manière :
Sub test() Sheets(Array("Feuil1", "Feuil2")).Select ActiveWindow.SelectedSheets.PrintOut End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
j' y revien encore ... je souhaiterais faire un bouton "suivant" et "précédent" dans l'aperçu avant impression, pouvoir me déplacer de feuille en feuille au lieu de faire cela comme ça :
etc... un bouton suivant et précédent c'est tout '-( merci
Bonsoir,
Pourquoi vouloir (re)faire des boutons qui existent déjà (en haut à gauche) dès
lors que plusieurs feuilles sont sélectionnées quand la fenêtre d'aperçu est
lancée ?
Avec du code, tu peux obtenir cet affichage de cette manière :
Sub test()
Sheets(Array("Feuil1", "Feuil2")).Select
ActiveWindow.SelectedSheets.PrintOut
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
j' y revien encore ...
je souhaiterais faire un bouton "suivant" et "précédent"
dans l'aperçu avant impression, pouvoir me déplacer de
feuille en feuille au lieu de faire cela comme ça :
Pourquoi vouloir (re)faire des boutons qui existent déjà (en haut à gauche) dès lors que plusieurs feuilles sont sélectionnées quand la fenêtre d'aperçu est lancée ? Avec du code, tu peux obtenir cet affichage de cette manière :
Sub test() Sheets(Array("Feuil1", "Feuil2")).Select ActiveWindow.SelectedSheets.PrintOut End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
j' y revien encore ... je souhaiterais faire un bouton "suivant" et "précédent" dans l'aperçu avant impression, pouvoir me déplacer de feuille en feuille au lieu de faire cela comme ça :
