NIXBeDMaN

кавычки поставьте
a = "no"
m = "no"
j = "no"
g = "no"

if a="yes" or m="yes" or j="yes" or g="yes" then
MsgBox "est frukti"
else
MsgBox "fruktov net"
End If