bonjour,
sachant que le ToggleButton a 3 état {True, False, Null} qu'est-ce qui justifie l'utilisation de ce contrôle ?
pour les select, selection et autres Activate tu fusionner les institutions.
'Sheets("H").Activate
'Columns("B:B").Select
'Range("C1").Activate
'Selection.EntireColumn.Hidden...