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 !

Papynou

XLDnaute Occasionnel
Bonjour le forum,

Pour imprimer un UserForm j'utilise un des codes de MichelXld 🙂

Private Sub Cmb_Imprimer_Click()
Dim Ws As Worksheet

keybd_event vbKeySnapshot, 1, 0&, 0&
DoEvents
Set Ws = Sheets.Add
Ws.PageSetup.Orientation = xlLandscape
Ws.Paste
With Ws
.PageSetup.CenterHorizontally = True
.PageSetup.CenterVertically = True
.PrintOut
End With
End Sub

Code auquel j'ai rajouté : .Delete entre .PrintOut et End With, de façon à supprimer la feuille créée mais Excel me demande si je veux vraiment la supprimer 😡

Comment puis-je faire pour supprimer cette demande d'Excel que je trouve inutile 😕
 
- 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

  • Question Question
Microsoft 365 Pb avec Windows
Réponses
47
Affichages
3 K
Réponses
8
Affichages
1 K
Réponses
3
Affichages
951
Réponses
1
Affichages
1 K
Réponses
13
Affichages
2 K
Retour