Excel VBA質問箱 IV

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

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


70505 / 76734 ←次へ | 前へ→

【10734】Re:小数点
回答  Asaki  - 04/2/10(火) 16:25 -

引用なし
パスワード
   簡単な例ですが。

AからCの合計値を、E列の同じ行に表示します。
Sub test()

  Dim rng1  As Range
  Dim rng2  As Range
  Dim lng1  As Long
  Dim lng2  As Long

  Set rng1 = Range("A1:C5")
  Set rng2 = Range("E1:E5")
  For lng1 = 1 To rng1.Rows.Count
    For lng2 = 1 To rng1.Columns.Count
      rng2(lng1, 1).Value = rng2(lng1, 1).Value + rng1(lng1, lng2).Value
    Next lng2
  Next lng1
End Sub

もうちょっと、周辺のコードがわからないと、どのように上手く言ってないのかが判らないです。
0 hits

【10721】小数点 aa 04/2/10(火) 13:43 質問
【10722】Re:小数点 Asaki 04/2/10(火) 13:46 回答
【10723】Re:小数点 aa 04/2/10(火) 13:58 質問
【10724】Re:小数点 Asaki 04/2/10(火) 14:02 回答
【10725】Re:小数点 aa 04/2/10(火) 14:29 質問
【10726】Re:小数点 aa 04/2/10(火) 14:34 質問
【10727】Re:小数点 Asaki 04/2/10(火) 14:54 回答
【10728】Re:小数点 aa 04/2/10(火) 15:12 質問
【10729】Re:小数点 Asaki 04/2/10(火) 15:16 回答
【10730】Re:小数点 aa 04/2/10(火) 15:21 質問
【10731】Re:小数点 Asaki 04/2/10(火) 15:39 回答
【10732】Re:小数点 aa 04/2/10(火) 16:01 お礼
【10733】Re:小数点 aa 04/2/10(火) 16:24 お礼
【10735】Re:小数点 Asaki 04/2/10(火) 16:26 発言
【10734】Re:小数点 Asaki 04/2/10(火) 16:25 回答
【10736】Re:小数点 aa 04/2/10(火) 17:01 お礼

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