Как установить проверенное свойство в vba (формат или панель инструментов управления)

Question

Как установить проверенное свойство в vba (формат или панель инструментов управления)

Я пытаюсь изменить значение своего флажка к истинному на основе значения другой ячейки

if range("A1").value = "green" then
Checkbox1.value= true

end if

Как я изменяю свойство значения на истинный для нескольких флажок одновременно

По некоторым причинам код, который я попробовал, не делает ничего вообще. P.S. Я использую флажки формата

6

excel vba checkbox

задан user362729 11 June 2010 в 17:59

2 ответа

Это отлично работает для меня:

If range("O26").Value = "green" Then
    CheckBox1.Value = True
    CheckBox2.Value = True
End If

Если вы находитесь в режиме дизайна, это не будет работать.

0

ответ дан 16 December 2019 в 21:34

Другие вопросы по тегам:

excel vba checkbox

Похожие вопросы:

score 8 · Accepted Answer

Это изменит все флажки.

Sub Changeboxes()

    Dim cb As CheckBox

    If Sheet1.Range("a1").Value = "green" Then
        For Each cb In Sheet1.CheckBoxes
            cb.Value = True
        Next cb
    End If

End Sub

Если вам нужно указать определенные флажки, тогда

Sub ChangeSomeCbs()

    If Sheet1.Range("a1").Value = "green" Then
        Sheet1.CheckBoxes("Check Box 1").Value = True
        Sheet1.CheckBoxes("Check Box 2").Value = False
        Sheet1.CheckBoxes("Check Box 3").Value = True
    End If

End Sub

флажки и флажки являются скрытыми свойствами. Вы не получите intellisense, но они работают.