Excel VBA質問箱 IV

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

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


51022 / 76732 ←次へ | 前へ→

【30586】Re:毎月行数の違うデータを最終行まで合計し...
回答  tbtk  - 05/10/31(月) 14:43 -

引用なし
パスワード
   はじめまして私も初心者なのでもっといい方法があるかもしれませんが
私が使用しているのと似ているので参考になれば
Dim A As Integer
Dim B As Integer
  A = Range("A65536").End(xlUp).Row
  For B = 1 TO A
    Cells(B, 4) = Cells(B, 5) + Cells(B, 6)
  Next B

   (列)   A      B   C   D     E     F
(行)     ユニット名    日  時        データ1 データ2
 1      A      1   0         100   200
 2      A      1   1         123   400
 3      A      1   2         234   468
 ・・・
4664      F      30  22         450   158
4665      F      30  23         340   245
間違い等があったらすみません。
3 hits

【30585】毎月行数の違うデータを最終行まで合計し... あかつき 05/10/31(月) 14:26 質問
【30586】Re:毎月行数の違うデータを最終行まで合計... tbtk 05/10/31(月) 14:43 回答
【30604】Re:毎月行数の違うデータを最終行まで合計... ponpon 05/10/31(月) 19:40 発言
【30606】Re:毎月行数の違うデータを最終行まで合計... Mi 05/10/31(月) 20:58 発言
【30624】Re:毎月行数の違うデータを最終行まで合... あかつき 05/11/1(火) 13:24 お礼

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