ExcelVBAで三項演算子

代替の関数がある

Function IIf(Expression, TruePart, FalsePart)