В настоящее время у меня есть код VBA, который я скопировал с веб-сайта в мой файл Excel, чтобы снять все флажки в активной рабочей таблице.Однако, когда они не отмечены, формулы (выполняемые через VBA), которые должны очищать содержимое определенных ячеек, когда флажки сняты, не действуют.Например: у меня установлены формулы VBA, так что если установлен флажок 1, значение определенной ячейки изменяется, чтобы отразить определенную информацию, и код VBA также делает содержимое ячейки прозрачным, когда флажок снят.Проблема с приведенным ниже кодом заключается в том, что когда он запускается (он успешно снимает флажки), значения ячеек, подключенных к этим флажкам, не очищаются, как это должно быть, когда флажок снят.Вот код:
Sub ClearCheckBoxes()
'Updateby Extendoffice 20161129
Dim chkBox As Excel.CheckBox
Application.ScreenUpdating = False
For Each chkBox In ActiveSheet.CheckBoxes
chkBox.Value = xlOff
Next chkBox
Application.ScreenUpdating = True
Call SiteClear
End Sub