Экранные флажки Excel (VBA): вернуть значение, если проверено несколько ячеек.

Когда «Да» проверено только для «за пределы проекта», применяется форма А. Когда он отменяется для «за пределы места», применяется форма B. Но если я проверю оба варианта, применим форму С.Экранные флажки Excel (VBA): вернуть значение, если проверено несколько ячеек.

Включая таблицу и формулу, которые я использую для каждого флажка. check9 для каждого проектного предела, а check10 - для каждого местоположения.

Spreadsheet

Private Sub check9_Click() 
    If check9.Value = True Then 
    Range("G24").Value = "Form A" 
Else 
    Range("G24").Value = " " 

End If 
End Sub 

    Private Sub check10_Click() 
    If check10.Value = True Then 
    Range("G26").Value = "Form B" 

Else 
    Range("G26").Value = " " 
End If 
End Sub

источник

2016-03-04 Anonymous

Вы должны проверить состояние другой флажок при определении формы. Что-то вроде этого:

Private Sub check9_Click() 
    If check9.Value = True and check10.value = True Then 
     Range("G24").Value = "Form C" 
    ElseIf check9.Value = True and check10.Value = False Then 
     Range("G24").Value = "Form B" 
    ElseIf check9.Value = False and check10.Value = True Then 
     Range("G24").Value = "Form A" 
    End If 
End Sub 

Private Sub check10_Click() 
    If check9.Value = True and check10.value = True Then 
     Range("G24").Value = "Form C" 
    ElseIf check9.Value = True and check10.Value = False Then 
     Range("G24").Value = "Form B" 
    ElseIf check9.Value = False and check10.Value = True Then 
     Range("G24").Value = "Form A" 
    End If 
End Sub

источник

2016-03-04 14:46:38 Tim

Здравствуйте, Я хочу форм А, С и В, чтобы появиться в клетках G24, G25 и G26, соответственно. Я скорректировал код так, чтобы он был пуст, если ни один из них не был проверен. Но если я попытаюсь щелкнуть оба, Form C и Form A или Form B покажут, в зависимости от того, на каком я сначала проверил «да». Любые предложения? –

Таким образом, флажок box1 очищает G25 и G26. 'IF' box2 не установлен. 'IF' box2 проверяется, а box1 не проверяется,' THEN' очистить G24 и G26. И т. Д. У вас есть 2 события (события checknn_click) и два свойства для оценки (checknn.value). Просто «проверьте статус другого флажка» в событии клика, чтобы определить значения G24, 25 и 26. – Tim

вызов этой функции от каждого клика

public function FormNeeded()  
    if check9.value=true and check10.value=false then 
     range("g26").value="Form1" 
    elseif check9.value=false and check10.value=true then 
     range("g26").value="Form2" 
    elseif check9.value=true and check10.value=true then 
     range("g26").value="Form3" 
    end if 
end function

источник

2016-03-04 14:44:25

Экранные флажки Excel (VBA): вернуть значение, если проверено несколько ячеек.

ответ

Смежные вопросы