Bonjour au forum, si vous pouviez me donner un petit coup de pouce pour finaliser une macro d impression...
Je ne trouve pas comment stopper la macro à la première feuille pour avoir un aperçu avant impression.
Actuellement ma macro s exécuté jusqu'au bout,elle M affiche l aperçu avant impression de la deuxième sélection.
Voici le code ci dessous
Merci par avance.
ActiveSheet.Unprotect
Application.ScreenUpdating = False
ActiveSheet.PageSetup.PrintArea = "$C$2:$P$78"
Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
'ICI MANQUE LE CODÉ POUR STOPPER LA MACRO TANT QUE JE NAI PAS CLIQUE SUR IMPRIMER DANS LE GESTIONNAIRE D IMPRESSION'
ActiveSheet.PageSetup.PrintArea = "$C$79:$P$134"
Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
Range("K7").Select
ActiveSheet.Protect
Application.ScreenUpdating = True
End Sub