myRange = Null

質問

VBA Professional Office 2003の試験問題ですが
http://vbae.odyssey-com.co.jp/study/sample_2003.html

Sub Sample1()
Dim myRange As Range
On Error Resume Next '――(1)
If myRange = Null Then '――(2)
Debug.Print "OK" '――(3)
Else
Debug.Print "NO" '――(4)
End If
End Sub

の(3)が実行されるのは、
myRange = Null
が正しいからではなく、
(2)のIf myRange = Null Thenのコードが無視されたから
次のコードの(3)がたまたま実行されただけですか？

(2)をIf myRange <> Null Thenにしても
ＯＫになりました。

回答No.1

K Kazz（@JazzCorp） · ベストアンサー

On Error Resume Next '――(1)
が働いて次ステップへ、、、
エラー：91？？

お礼

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

回答No.2

samtomsan

質問者が示されている試験問題の答えに書かれていますが、
(2)でエラーが発生するが(1)でエラーが発生しても次の行を実行すると指定していますので、=も<>も関係なく(3)が実行されます。
ようするに(2)が問題です。
確認するには(1)を消すかコメントにすれば判ります。

お礼

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