Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


107 / 13196 ツリー ←次へ | 前へ→

【79734】Cellsのエラー(VBA) やまだん 18/3/26(月) 16:47 質問[未読]
【79736】Re:Cellsのエラー(VBA) hatena 18/3/26(月) 17:21 回答[未読]
【79738】Re:Cellsのエラー(VBA) やまだん 18/3/27(火) 13:48 お礼[未読]

【79734】Cellsのエラー(VBA)
質問  やまだん  - 18/3/26(月) 16:47 -

引用なし
パスワード
   ExcelのVBAに関して、
下記のように、特定の数値データから一定値に達した部分の行数を読み込みたく
プログラムを作成したのですが、

Sub Getn()
Dim i As Long
Dim n As Integer

n = 3

Do Until i > 0
i = Cells("3,n") - Range("H8")
n = n + 1
Loop

Cells関数のエラーで、プロシージャの呼び出しまたは因数が不正ですというエラーが出ます。
nの部分を数値に換えるとデバック自体は進むので、関数の定義の仕方が間違っているのかと思うのですが、
初心者で調べてもわからなくて、ここで質問させていただきました。

【79736】Re:Cellsのエラー(VBA)
回答  hatena  - 18/3/26(月) 17:21 -

引用なし
パスワード
   >i = Cells("3,n") - Range("H8")

下記に変更してください。

i = Cells(3, n) - Range("H8")

Cellsの引数は、行、列 を数値で指定します。

【79738】Re:Cellsのエラー(VBA)
お礼  やまだん  - 18/3/27(火) 13:48 -

引用なし
パスワード
   ▼hatena さん:

素早いご対応ありがとうございます!
教えていただいた方法で作動しました!

107 / 13196 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free