Hello All,
Can you help. I would like to add a part to ths script i have a yes no option but want to add an N/A.
This is for scoreing on questions from 1-10. Each yes no gives 10 points.
Some questions are N/A so want to give 10 popints the same as if it was yes.
Can you help. I would like to add a part to ths script i have a yes no option but want to add an N/A.
This is for scoreing on questions from 1-10. Each yes no gives 10 points.
Some questions are N/A so want to give 10 popints the same as if it was yes.
Code:
With ws.Shapes("drop down 3").ControlFormat
If .Value = 0 Then
MsgBox "You have not selected an answer for Question 2.", vbOKOnly, "Crossrail TfS Agent Scorecard"
Exit Sub
ElseIf .List(.Value) = "Yes" Then
intscore = intscore + 10
strq2 = "Yes"
Else
intscore = intscore
strq2 = "No"
End If
End With