Bonjour,
voir sur le fichier joint,
Sub Bouton2_Cliquer()
Application.ScreenUpdating = False
Sheets("A1").Visible = False
Sheets("A2").Visible = False
Sheets("B1").Visible = True
Sheets("B2").Visible = True
Application.ScreenUpdating = True
End Sub
Sub Bouton1_Cliquer()
Application.ScreenUpdating = False
Sheets("A1").Visible = True
Sheets("A2").Visible = True
Sheets("B1").Visible = False
Sheets("B2").Visible = False
Application.ScreenUpdating = True
End Sub