Excel VBA質問箱 IV

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

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


33837 / 76734 ←次へ | 前へ→

【48113】Re:条件付で累計したいのですが。
発言  りん E-MAIL  - 07/4/4(水) 7:27 -

引用なし
パスワード
   けいこ さん、おはようございます。

>ブック2
>
>     A列 B列 C列 D列 E列 F列
>     4月 5月  6月 7月 8月 9月
>売上    0  200  0  0  0  700
>実働費用  50  130  100 300 100 80
>条件
>・売上がある月はゼロにする。
>・売上がない月は累計を出す(売上が上がるまで)

売り上げが2行目、実働費用が3行目、4月がA列として、
[A4]=IF(A2=0,A3,0)   '前月がないので参照のみ
[B4]=IF(B2=0,B3+A4,0) '累計していく
B4をF4までコピー

これでお望みの値は求められます。

なので、こんな計算方法で値は出ます。

  Dim dt(0 To 6) As Long
  For II% = 1 To 6
   If Cells(2, II%).Value = 0 Then
     dt(II%) = dt(II% - 1) + Cells(3, II%).Value '累計する
   Else
     dt(II%) = 0 '0
   End If
   'こんな合計値
   MsgBox dt(II%)
  Next
6 hits

【48101】条件付で累計したいのですが。 けいこ 07/4/3(火) 21:05 質問
【48113】Re:条件付で累計したいのですが。 りん 07/4/4(水) 7:27 発言
【48127】Re:条件付で累計したいのですが。 けいこ 07/4/4(水) 20:57 質問
【48148】Re:条件付で累計したいのですが。 りん 07/4/5(木) 8:36 発言
【48244】Re:条件付で累計したいのですが。 けいこ 07/4/9(月) 21:58 発言
【48278】Re:条件付で累計したいのですが。 りん 07/4/11(水) 8:52 発言
【48293】Re:条件付で累計したいのですが。 けいこ 07/4/11(水) 23:32 発言

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