Включение и выключение фона
Включение и выключение фона, - простые операции. Достаточно выделить нужную область и установить соответствующие свойства объекта Selection. Вот два макроса, решающие эту задачу. Нетрудно догадаться, с какими кнопками нашей панели они связаны:
Public Sub FonPlus() 'Заливает область бланка серым цветом Range("A1:K56").Select With Selection .Font.ColorIndex = 1 .Interior.ColorIndex = 15 End With Range("A1").Select End Sub
Public Sub FonMinus() 'Восстанавливает белый цвет в области бланка Range("A1:K56").Select With Selection .Font.ColorIndex = 1 .Interior.ColorIndex = 2 End With Range("A1").Select End Sub