bonjours a tous
voici une macro que je viens de monte
mon probleme et que je suis sur une feuille nome divers
et que je veux imprime une feuille nome base sans que celle ci apparaisse
ma macro imprime bien mais fait apparaitre la feuille nome base
Sub ImprimeBASE()
'Msg = "Voulez-vous vraiment imprimer le rapport ?"
Style = vbYesNo + vbCritical + vbDefaultButton1
Title = "IMPRESSION DU RAPPORT"
Réponse = MsgBox(Msg, Style, Title)
If Réponse = vbYes Then
GoTo continu
Else
Exit Sub
End If
continu:
Dim MaFeuille As Object
Application.ScreenUpdating = False
'Emplacement des pages a imprimer
Set montab = Worksheets(Array(3))
'For Each MaFeuille In montab
'MaFeuille.Select
'Zone D'impression
ActiveSheet.PageSetup.PrintArea = "$a$1:$E$26"
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Next
si vous avait des idees merci par avance
aiglon74