Bouton pour ouvrir un apercu avant impression

Résolu
yoann_b29 Messages postés 18 Date d'inscription mardi 22 mai 2007 Statut Membre Dernière intervention 3 juin 2008 - 7 juin 2007 à 17:27
yoann_b29 Messages postés 18 Date d'inscription mardi 22 mai 2007 Statut Membre Dernière intervention 3 juin 2008 - 8 juin 2007 à 10:37
bonjour ,

Je travail avec VBA excel et j'aimerais créer un bouton dans un userform pour ouvrir un apercu avant impression d'une des feuilles excel.
Je pense que il faut utiliser "printpreview" mais je n'aarive toujours pas a se que je veux .

Si quelqu'un peut m'aider sa serais simpas

4 réponses

fiko81 Messages postés 381 Date d'inscription vendredi 24 septembre 2004 Statut Membre Dernière intervention 5 septembre 2010 3
7 juin 2007 à 17:34
Salut,

ActiveWindow.SelectedSheets.PrintPreview
Si tu veux une feuille spécifique, alors à la place de selectedsheets tu mets ta feuille
 Fiko ;-)

La reponse vous convient pensez > Accepter <
<hr />
3
yoann_b29 Messages postés 18 Date d'inscription mardi 22 mai 2007 Statut Membre Dernière intervention 3 juin 2008
7 juin 2007 à 17:48
salut,
 Merci de m'aider, mais sa n'a pas marcher.
voila ce que j'ai mis:

Private Sub b_actions_Click()
    ActiveWindow.sheets("actions").PrintPreview
End Sub
3
cs_cheyenne Messages postés 693 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 17 avril 2017 2
7 juin 2007 à 20:00
Bonjour,

   ActiveSheet.PrintPreview 
      '   si besoin, pour enlever le pointillé de la zone d'impression
   ActiveSheet.DisplayPageBreaks = False

ou
   Sheets("nom").PrintPreview
   Sheets("nom").DisplayPageBreaks = False

Bonne continuation,

Cheyenne
3
yoann_b29 Messages postés 18 Date d'inscription mardi 22 mai 2007 Statut Membre Dernière intervention 3 juin 2008
8 juin 2007 à 10:37
bonjour,

J'ai fais :

sheets("nom").printPreview = true

et sa passe.merci bien
 a+
3