Bonjour,
Je pense que avec mon code ci-dessous je devrais faire une boucle car pour le moment seul le premier onglet est modifié, mais je pensais pouvoir l'éviter, une idée ?
par avance merci pour votre aide
Je pense que avec mon code ci-dessous je devrais faire une boucle car pour le moment seul le premier onglet est modifié, mais je pensais pouvoir l'éviter, une idée ?
par avance merci pour votre aide
Code:
Sub ToggleButton1_Click()
Application.ScreenUpdating = False
If ToggleButton1.Value = True Then
Sheets(Array("Z110", "243", "19", "Z046", "Z108", "106", "Z052", "311", "465", _
"116", "79", "529", "31", "467", "51", "89", "Z050", _
"415", "422", "242", "58", "95", "362", "15", "55", "302", "70", "118", _
"121", "474", "334", "76", "Z010", "124", "112")).Select
ActiveSheet.Columns("Y:AL").Hidden = True
Else
Sheets(Array("Z110", "243", "19", "Z046", "Z108", "106", "Z052", "311", "465", _
"116", "79", "529", "31", "467", "51", "89", "Z050", _
"415", "422", "242", "58", "95", "362", "15", "55", "302", "70", "118", _
"121", "474", "334", "76", "Z010", "124", "112")).Select
ActiveSheet.Columns("A:IV").Hidden = False
End If
Worksheets("Cover").Activate
Application.ScreenUpdating = True
End Sub