Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Feuille qui plante après impression

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mariobros

XLDnaute Nouveau
Sur une feuille de mon classeur Excel 2013, j'ai créé un bouton affecté
à une macro qui m’affiche un aperçu avant impression de la feuille.

Voici le code utilisé dans le module :
Sub Imprimer()
Application.CommandBars.ExecuteMso (“PrintPreviewAndPrint“)
End Sub

Cela fonctionne parfaitement, mais le problème survient après le message
d’impression au retour sur la feuille ouverte, car elle reste inopérante, figé,
plus aucun bouton ne fonctionne et je suis obligé de fermer le classeur et de le rouvrir.

Merci à Philippe pour son aide qui ne me bloque plus la feuille en m'indiquant cela:

Sub Imprimer()
ActiveSheet.PrintOut
End Sub

Mais comment faire pour retrouver l'aperçu avant impression avec le choix de l'imprimante et des paramètres...
 
Dernière édition:
Re : Feuille qui plante après impression

Bonjour mariobros et bienvenue sur le forum

essaie ceci:

Sub Imprimer()
ActiveSheet.PrintPreview
End Sub



ou pour imprimer:
Sub Imprimer()
ActiveSheet.PrintOut
End Sub



à+
Philippe
 
Re : Feuille qui plante après impression

Bonjour Philippe
je viens d'essayer ta formule,
mais:
1) j'ai la partie aperçu mais je n'est plus la partie sélection (imprimante, format, ets...)
2) il y a le sablier qui tourne sans arrêt et il ne se passe rien (pas d'impression)
 
Re : Feuille qui plante après impression

Super, déjà une avancée, la feuille est imprimé et je reviens sur ma feuille qui fonctionne parfaitement,
seul bémol, je n'ai plus d'aperçu avant impression... donc je n'est plus le choix de l'imprimante et de tous les autres réglages...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
1 K
Réponses
1
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…