Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
68497 / 76734 ←次へ　｜　前へ→
【12774】合計を計算したいのですが・・
質問  ぴぴ  - 04/4/14(水) 17:20 -
引用なし
パスワード
   下記のコードで、Ｅ列の最後のセル（数式で計算された値が入力してある）
の下の行に
Ｂ列に”合計”が入り、Ｃ列にはＣ３からの合計が計算され
Ｄ列にはＤ３からの合計が計算され表示されるようにしたいのですが、
Ｃ列・Ｄ列はどのようなコードにすればよいのでしょうか？

Sub Test()
Dim i As Long
　　Application.ScreenUpdating = False

　’数式の入っているＥ列の最後の値を検索します

　 For i = 200 To 2 Step -1
　　　　If i = 2 Then
　　　　　
　　　　ElseIf Cells(i, 5).Value <> "" Then

　　　　　
　　　　　 Exit For
　　　　End If
　　Next
’Ｅ列の最後の値のセルの下の行へ
　Dim ab
　
　ab = Cells(i, 5).Row + 1
　
　ActiveSheet.Cells(ab, 2).Value = "合計"

　−−−ここへＣ列・Ｄ列の合計が計算されるようにしたいのですが−−

End Sub
3 hits
▼ 【12774】合計を計算したいのですが・・ ぴぴ 04/4/14(水) 17:20 質問≪
【12785】Re:合計を計算したいのですが・・ YO 04/4/14(水) 20:42 発言
【12788】Re:合計を計算したいのですが・・ Asaki 04/4/14(水) 21:11 回答
【12790】Re:合計を計算したいのですが・・ ぴぴ 04/4/14(水) 22:30 お礼
【13005】Re:合計を計算したいのですが・・ ジャコ 04/4/20(火) 23:27 質問
【13010】Re:合計を計算したいのですが・・ Asaki 04/4/21(水) 9:18 回答
【13011】Re:合計を計算したいのですが・・ ジャコ 04/4/21(水) 9:35 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
68497 / 76734 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free