Страницы: 1
RSS
снять "галочки" со всех флажков на листе
 
Здравствуйте! У меня на листе excel есть документ, где проставлена масса флажков (форма, а не элемент управления). Подскажите, пожалуйста, как можно с помощью макроса разом снять все "галочки" на листе (как бы привести в незаполненное состояние)?
 
Если других объектов на листе нет, то подойдёт и такой вариант:  
Sub CheckBox_Off()  
Dim x As Object  
   For Each x In ActiveSheet.DrawingObjects  
       x.Value = False  
   Next  
End Sub
 
Спасибо, все замечательно работает!
Страницы: 1
Читают тему
Наверх