No.4ベストアンサー
- 回答日時:
こんにちは。
> オブジェクトの定義エラーと表示されます。
Cells プロパティーの書式は、
Cells(RowIndex, ColumnIndex)
ですが、行列のIndex には範囲があって、
・RowIndex : 1~65536
・ColumnIndex: 1~256
でなければなりません。例えば、zentai(n) + gyou(n) の計算結果で
ColumnIndex を指定しているわけですが、この範囲を超えてませんか?
あるいは、計算結果が 0 になってしまっているとか?
、、、RowIndex のところに retsu(n) とあるのも気になると言えば、なり
ますが。行列番号の指定が逆になってないですか?
取り合えず、他の方がコメントされているように、変数の中身を出力して
確認するのが良いでしょう。
VBE でイミディエイトウインドウを表示して、下記のコードでチェックし
てみて下さい。
' イミディエイトウインドウに変数の値を表示してみる
Debug.Print "RowIndex:=" & retsu(n) + 3; " ColumnIndex:=" & zentai(n)
Debug.Print "RowIndex:=" & retsu(n) + 3; " ColumnIndex:=" & zentai(n) + gyou(n)
If Cells(retsu(n) + 3, zentai(n)).Value + 10 < Cells(retsu(n) + 3, zentai(n) + gyou(n)).Value Then
No.3
- 回答日時:
>デバックの時に値が代入されているか確認したところ各配列には値がしっかり入っています。
なぜだめなんでしょうか。。その代入されている値を具体的に教えてください。
それと、その比較しようとしているセルに入っている値を具体的に押してください。
No.2
- 回答日時:
えっと、以下のプログラムは動きますんでIF文がおかしいわけではないと思います。
If Cells(1, 1).Value < Cells(1, 2) Then
MsgBox "Cell(1,1)のほうがちっちゃい"
ElseIf Cells(1, 1).Value = Cells(1, 2) Then
MsgBox "Cell(1,1)とCell(1,2)は一緒"
Else
MsgBox "Cell(1,2)のほうがちっちゃい"
End If
なので、使用している変数(retsu()、zentai()、gyou())に問題があると思います。
retsu()、zentai()、gyou() の値を出力して確認してみてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) なぜExit Subがあるのかわかりません 4 2023/02/19 12:34
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) VBA処理追加 こちらでご教示頂いたのですが回答完了させてしまいましたのでこちらからまた質問させてく 2 2022/10/27 09:57
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 09:25
- Visual Basic(VBA) 検索のユーザーフォームの表示について 1 2023/03/27 23:31
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- C言語・C++・C# C# DatagridviewにExcelシートを反映するとエラーが出る 2 2023/05/06 17:12
- Visual Basic(VBA) エラーコード1004 6 2022/06/09 14:12
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
繰り返し1行~28行までを順順に...
-
C言語で余りがマイナスになる場合
-
Scilabで行列をグラフ化したい...
-
!(否定)演算子について
-
エクセルのマクロについて教え...
-
Excel・Word リサーチ機能を無...
-
UserForm1.Showでエラーになり...
-
エクセルで特定の列が0表示の場...
-
配列数式の解除
-
メッセージボックスのOKボタ...
-
Excel マクロ VBA プロシー...
-
特定のPCだけ動作しないVBAマク...
-
マクロの記録を使用したマクロ...
-
2つ以上の変数を比較して最大数...
-
「実行時エラー '3167' レコー...
-
一つのTeratermのマクロで複数...
-
教えて下さい
-
エクセルに張り付けた写真のフ...
-
配列でデータが入っている要素...
-
【VBA】ワークブックを開く時に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
繰り返し1行~28行までを順順に...
-
H8マイコン C言語でのプロ...
-
!(否定)演算子について
-
C言語で余りがマイナスになる場合
-
MATLABのデータ抽出についてお...
-
mathematicaの質問です
-
c言語
-
MATLABの参考書
-
パイソンのプログラミングにつ...
-
Matlabのspdiags関数
-
cのプログラミングで虚数を含...
-
≪C言語≫キー入力の判断について
-
OPENCVを使ったエピポーラ幾何...
-
フォートラン77での微分と行列
-
Numpyのrandom.multivariate_no...
-
MATLABにおける行の挿入方法
-
フランク行列の逆行列を求める...
-
収束計算
-
Pythonで行列の要素積(アダマ...
-
BLASのレベル3の『ssyrk』や『s...
おすすめ情報