【Excel VBA】If~ThenステートメントとOr演算子で複数条件(~または)を設定する方法