【VBA】範囲選択の方法が分かりません。

Question

実行時エラー'5'
プロシージャの呼び出し、または引数が不正です。

とのエラーが出ます。
範囲の選択が間違っているとインターネットで見ましたが、
下記コードのどこが間違えなのか色々試してみても分かりません。

【行いたい処理】
D62:E69のセルに1つでも空白がある場合　→　D70のセルに「2」と入力
D62:E69のセルが全て埋まっていたら（空白でない）　→　D70のセルに「1」と入力

Sub test()

If WorksheetFunction.CountBlank(Rabge("D62:E69")) > 0 Then
Cells("D70").Value = "2"
Else
cells("D70").Value = "1"

End If
End Sub

Comments

[1T2R3M4]

Rabge
とは何でしょうか。

[退会済みユーザー]

Rangeでした。
質問時のタイプミスです、申し訳ございません。

Answer 1

Cellsは、行と列をインデックスで指定するものです。

[書式]

Cells(行インデックス, 列インデックス).Select

なのでこの場合は

Sub test()

If WorksheetFunction.CountBlank(Rabge("D62:E69")) > 0 Then
　　Cells(70,4).Value = "2"
Else
　　cells(70,4).Value = "1"
End If

End Sub

とするのが正しいです。
列と行の番号を求められているところに"D70"と文字列を入れたら
実行時エラーとなってしまうのです。

Comments

[退会済みユーザー]

ありがとうございます！
解決しました。