If～ThenステートメントとAnd演算子

質問

windows7、エクセル2013です。
セルに式が入っていてその計算された値が、
計算ERRを起こしている場合（#DIV/0!とか#VALUE!）、空白の場合、0の場合
は処理をしないで
それ以外の場合は処理をするようにしたいのですが
以下の構文ではerrになります。

どこが悪いのでしょうか？
よろしくお願いします。

If IsError(Cells(x, 20)) And (Cells(x, 20)) = 0 And (Cells(x, 20)) = "" Then
Else
y = Cells(x, 20) * Cells(x, 23)
End If

回答No.1

f272 · ベストアンサー

If IsError(Cells(x, 20)) Then
ElseIf (Cells(x, 20)) = 0 Or (Cells(x, 20)) = "" Then
Else
y = Cells(x, 20) * Cells(x, 23)
End If

お礼

Thenを使う行は1行でと思ったのですが
やはり2行でないとできないようです。
ありがとうございました。

回答No.3

Nouble

素人の、戯言
かも、知れません
お許しください。

例えば、
(Cells(x, 20))) = 0
と、されていますが

Cells() は、
謂わば
構造体への参照で
端的に、言うと
.Value以外の値も、内包しています

お示しの式、では
構造体中の、
どのメンバーの値を
評価対象に、するのか
指定してません　よね？

なので、
Cells(x, 20)
を、
Cells(x, 20).Value
と、試してみて
頂けませんか？

参考にどうぞ
https://www.moug.net/tech/exvba/0100047.html

お礼

ご丁寧にありがとうございました。

回答No.2

mt2015

こんな感じでどうでしょう。
・先にセルがエラーで無い事を確認しないと、値の確認（0や空白の確認）でエラーになります。
・セルが空白でも0でも値は0なのでまとめました。

If IsError(Cells(x, 20)) = False Then
　　If Cells(x, 20) <> 0 Then
　　　　y = Cells(x, 20) * Cells(x, 23)
　　End If
End If

質問のコードで気になりましたが、and と or の違いについて、もう少し理解が必要かと思えました。

お礼

遅くなって申し訳ありません。
＞and と or の違い
はい。確かに勘違いしておりました。
ありがとうございました。