VBA ternário

Sub condition()
    temp = 15
    msgbox IIf(temp >= 20, "hot", "cold")
End Sub
VasteMonde