Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13036 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【7288】複数のシートにまたがるデータの集計 daiko 03/8/31(日) 21:02 質問
【7291】Re:複数のシートにまたがるデータの集計 Jaka 03/9/1(月) 9:55 回答
【7292】Re:複数のシートにまたがるデータの集計 INA 03/9/1(月) 9:57 回答
【7350】Re:複数のシートにまたがるデータの集計 daiko 03/9/2(火) 22:58 お礼
【7288】複数のシートにまたがるデータの集計
質問  daiko  - 03/8/31(日) 21:02 -
引用なし
パスワード
   つい最近、エクセルを会社で使い始めたもので、どうして良いのか
一人悩んでいます。
このような場合、どのようにしたら良いのか教えていただけないでしょうか？

一つのシートの中に請求金額という欄が１カ所あるとします。
そして、同じフォーマットのシートが複数あるとします。
シートの枚数は、件数ごとに増えたり減ったりするので、いつも決まった数ではありません。
この状態で、全シートの請求金額の合計を求める場合、どのような
計算式にしたらいいのでしょうか？

どうかよろしくお願いします。
【7291】Re:複数のシートにまたがるデータの集計
回答  Jaka  - 03/9/1(月) 9:55 -
引用なし
パスワード
   こんにちは。
こんなんでどうでしょうか？
例えば
Sheet1〜3のA2の合計の場合。（串刺し）

=SUM(Sheet1:Sheet3!A2)
【7292】Re:複数のシートにまたがるデータの集計
回答  INA  - 03/9/1(月) 9:57 -
引用なし
パスワード
   >一つのシートの中に請求金額という欄が１カ所あるとします。
>そして、同じフォーマットのシートが複数あるとします。
>シートの枚数は、件数ごとに増えたり減ったりするので、
>いつも決まった数ではありません。
>この状態で、全シートの請求金額の合計を求める場合、どのような
>計算式にしたらいいのでしょうか？
対象セルはＡ１としてあります。
全シートのＡ１セルの合計をメッセージボックスで表示します。

Private Sub CommandButton1_Click()
Dim X
Dim Total As Long

For Each X In ActiveWorkbook.Sheets
　　Total = Total + X.Range("A1").Value
Next X

MsgBox Total

End Sub
【7350】Re:複数のシートにまたがるデータの集計
お礼  daiko  - 03/9/2(火) 22:58 -
引用なし
パスワード
   jakaさん、INAさん丁寧に教えていただいてありがとうございました。
早速、明日でも会社にてやってみようと思います。

エクセルもやってみると奥が深いんですね。

これからは、基本的な使い方に加え、応用的な使い方も勉強していきたいと思います。

ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13036 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free