Excel VBA質問箱 IV

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

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


13295 / 76734 ←次へ | 前へ→

【68945】Re:配列変数定義の利用方法
回答  sasa  - 11/5/1(日) 18:32 -

引用なし
パスワード
   >難点1:Dimの変数定義は分からない。

変数のデータ型は Variant にすべきでしょう。
具体例は以下コード。

>難点2:以下の計算仕組みとして、1.〜4.以外の方法は
>    ありますか?

通常次のようなコードになると思います。
Sub Sample1()
 Dim rg1 As Range, rg2 As Range, xx&, yy&
 Dim d1 As Variant, d2 As Variant
 Set rg1 = Range("b3:d7") 'データのレンジ指定
 Set rg2 = Range("b8:d8") '答えのレンジ指定
 '1.配列の各成分定義
 d1 = rg1
 '2.=合計値をゼロにセットする
 rg2.ClearContents
 d2 = rg2  '配列へセル値を代入
 '3.=各列の和を計算代入
 For yy = 1 To UBound(d1)   '行のループ
  For xx = 1 To UBound(d1, 2) '列のループ
   d2(1, xx) = d2(1, xx) + d1(yy, xx)
  Next
 Next
 '4.=最後、各列の和表示
 rg2 = d2 '配列からセルへ書戻し
End Sub

こちらを参考にしました。
ht tp://www2.aqua-r.tepm.jp/~kmado/kvba.htm
E95M007 シートのセルに変数2次元配列で高速にアクセスする

3 hits

【68944】配列変数定義の利用方法 マエ/ケン 11/5/1(日) 16:25 質問
【68945】Re:配列変数定義の利用方法 sasa 11/5/1(日) 18:32 回答
【68946】Re:配列変数定義の利用方法 マエ/ケン 11/5/1(日) 19:39 質問
【68949】Re:配列変数定義の利用方法 sasa 11/5/2(月) 1:33 回答
【68948】Re:配列変数定義の利用方法 UO3 11/5/1(日) 20:59 発言
【68957】Re:配列変数定義の利用方法 neptune 11/5/2(月) 16:06 発言
【68958】Re:配列変数定義の利用方法 マエ/ケン 11/5/2(月) 16:46 質問
【68963】Re:配列変数定義の利用方法 neptune 11/5/2(月) 23:14 発言

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