Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
577 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【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関数のエラーで、プロシージャの呼び出しまたは因数が不正ですというエラーが出ます。
ｎの部分を数値に換えるとデバック自体は進むので、関数の定義の仕方が間違っているのかと思うのですが、
初心者で調べてもわからなくて、ここで質問させていただきました。
【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 さん：

素早いご対応ありがとうございます！
教えていただいた方法で作動しました！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
577 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free