Excel VBA質問箱 IV

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

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


15046 / 76734 ←次へ | 前へ→

【67173】Re:お礼 Kanabun様 Hirofumi様
発言  kanabun  - 10/11/14(日) 0:29 -

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

どうも 配列a() の利用方法がよくわかりません。
ちょっとくどいのですが、

> この状態から例えば 変数 x : 3 変数 y : 5 と
> なった場合に

   A3 x B3
+) A4 x B4
+) A5 x B5
--------------
     16

> 6と8と2 を合計して、 “16です”と
> メッセージボックスで表示したいのです。

なら、

Sub TestSumProduct()
  Const x = 3, y = 5
  Dim r As Range
  
  Set r = Range("A" & x & ":A" & y)
  MsgBox WorksheetFunction.SumProduct(r, r.Offset(, 1))
End Sub

でいいと思うんですけど?

2 hits

【67163】任意の配列変数に格納された値を合計して表示したい。 リス 10/11/12(金) 19:13 質問
【67164】Re:任意の配列変数に格納された値を合計し... kanabun 10/11/12(金) 19:51 発言
【67165】Re:任意の配列変数に格納された値を合計し... kanabun 10/11/12(金) 20:00 発言
【67166】Re:任意の配列変数に格納された値を合計し... Hirofumi 10/11/12(金) 20:33 回答
【67167】お礼 Kanabun様 Hirofumi様 リス 10/11/12(金) 21:59 お礼
【67173】Re:お礼 Kanabun様 Hirofumi様 kanabun 10/11/14(日) 0:29 発言
【67209】Re:お礼 Kanabun様 Hirofumi様 リス 10/11/15(月) 22:24 お礼

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