Excel 2013 VBA 사용자 양식은 countIf 계산을 추가합니다.

Question

점수 카드를 만들려고합니다. 양식에는 yes, no, N/A 및 결과가 포함 된 몇 가지 질문 및 콤보 상자가 있습니다.

이

If ComboBox1=yes, ComboBox2=no, ComboBox3=yes and ComboBox4=N/A 

다음 계산 같은 것입니다 :

는 내가 뭘하려고 다음과 같이 작동 결과를 만드는 것입니다

evaluate.Lable1 = ((countif(Range(ComboBox1,ComboBox2,ComboBox3,ComboBox4),="yes")/(Counta(Range(ComboBox1,ComboBox2,ComboBox3,ComboBox4))-((countif(Range(ComboBox1,ComboBox2,ComboBox3,ComboBox4),="N/A") 

Answer 1

연구의 조금 내가 찾은 후 그 IIF 코드가 작동했습니다. 이에 대한 대답은 다음과 같습니다.

'Get the Numerator 
a = IIf(ComboBox1.Value = "Yes", 1, 0) + IIf(ComboBox2.Value = "Yes", 1, 0)_  
+ IIf(ComboBox3.Value = "Yes", 1, 0) + IIf(ComboBox4.Value = "Yes", 1, 0) 
'Get the Denominator 
b = 4 - IIf(ComboBox1.Value = "N/A", 1, 0) - IIf(ComboBox2.Value = "N/A", 1, 0) 
    - IIf(ComboBox3.Value = "N/A", 1, 0) - IIf(ComboBox4.Value = "N/A", 1, 0) 
'Put the Numerator and Denominator together as a percentage 
Lable1.Text = Format(a/b, "00.00%")