VBA で次のことを行うコードを記述しようとしていますが、エラーが発生します: タイプの不一致
Quarkは文字列変数です
If quark = "F" Or "DE" Or "ED" Then
各「OR」は独自のブール文です。
If quark = "F" Or quark ="DE" Or quark ="ED" Then
私が思うに、あなたはあなたがケースでやろうとしていることを達成することができます
Select Case quark
Case "F","DE","ED"
stuffHere
end select
編集: 型の不一致が発生しているように見えますが、クォークを文字列として暗くしましたか?
dim quark as string
次のように比較してみてください:-
If quark = "F" Or quark = "DE" Or quark = "ED" Then
それ以外の:-
If quark = "F" Or "DE" Or "ED" Then