- ベストアンサー
エクセルの合計について教えてください。
tom04の回答
- tom04
- ベストアンサー率49% (2537/5117)
こんばんは！ 参考になるかどうか判りませんが・・・ 元の表がどのような感じかわからないので 勝手に↓のような表を作ってみました。 E列には数式が入っているものとしています。 最初の表作成段階で合計と入力行の間は必ず2行あけるようにしています。 操作したいSheet見出し上で右クリック → 白い画面が出ますので ↓のコードをコピー＆ペーストしてみてください。 Private Sub Worksheet_Change(ByVal Target As Range) Dim i, j As Long i = Cells(Rows.Count, 2).End(xlUp).Row - 2 j = 4 j = Target.Column If j <> 4 Or Cells(i, 5) = "" Then Exit Sub Range(Cells(i + 1, 1), Cells(i + 1, 5)).Copy Range(Cells(i + 2, 1), Cells(i + 2, 5)).Insert (xlDown) Cells(i + 3, 5).Value = WorksheetFunction.Sum(Range("E2:E" & i + 1)) Cells(i, 1).Offset(1).Select End Sub これでD列（単価）が確定すると行が1行挿入され、最下段に合計が表示されると思います。 画像では右側の表が左側のように変化していきます。 以上、この程度ですが 参考にならなかったら読み流してくださいね。m(__)m
関連するQ&A
- Excelの条件検索による合計計算
ExcelでA列に日付、B列に商品名、C列に売上金額を入れて、日々の売上管理をしています。最大でも500行と仮定します。 B列のりんごの合計、みかんの合計など商品ごとの合計を算出したいと考えています。B列の商品ごとの合計です。 この場合には、どの様な関数・数式を使用するのでしょうか？ 宜しくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル 項目ごとの合計
エクセルについて質問です。 何の項目があるのか分からない状態で、項目ごとの合計を出せる関数はありますか？ 商品の売上明細のデータがあります。 商品名ごとに合計金額をだしたいが、商品名の列に何の商品があるかわかりません。 ピポットテーブルを使ったり、まず何の商品の明細があるかを調べてからSUMIF等使うといった方法以外で、何かありますでしょうか？ 毎月商品ごとの売上金額を調べたいのですが、何の商品が売れるか分かりません。 できれば、予め数式を組んでおいて、売上明細データを貼り付けるだけで結果がでるようにしたいです。 商品数が多いため、全ての商品名の行を作るのは避けたいです。 よろしくお願い致します。
- 締切済み
- Excel（エクセル）
- エクセルvlookup関数で値を取得したいリストの行数が多すぎてエクセ
エクセルvlookup関数で値を取得したいリストの行数が多すぎてエクセルで表示できない 単純にa列をキーにしてb列の値を取得したいですがリストの行数が65＊＊＊行以上でエクセルで開くと欠落します。リストはcsvでオープンしないで値を取得することはできますか？ 宜しくお願いいたします。
- ベストアンサー
- その他MS Office製品
- エクセルの個々の合計値
ご質問があります。 エクセルを使って大量行数の計算を考えております。 どなたか関数などのアドバイスを頂けないでしょうか。 １．左セル（値）には数値が始めから入力あり。 ２．右セル（合計値）に左セルの合計値を反映したい。 ３．左セル（値）の値が空白でない限り上から順に足し算する。 ４．左セル（値）の入力が始まっているところに右セル（合計値）を反映したい。 ５．左セル（値）の空白行数はランダムである。
- ベストアンサー
- その他([技術者向] コンピューター)
- Excelで月別の合計等を出す方法を教えてください
Excel初心者です。 Excel2003で売上表を作っています。 １行にお客さん毎の売上で、売上日、売上額の列を作っています。 名前 商品名 数量 日付 金額 Ａ コーヒー 2 3/15 1000 Ｂ 紅茶 5 3/20 2000 Ｃ コーヒー 3 4/10 1500 Ｄ 緑茶 10 4/22 7000 ・ ・ 月別合計売上額、合計客数などの表を作りたいのですが どのようにしたらよいのでしょうか？ 一応Excelの本などを読んだのですがよくわかりませんでした。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル
エクセル エクセルの使い方で質問です。 商品Ａ 売上 ２個 1,000円 商品Ａ 返品 １個 －５００円 商品Ｂ 売上 ２個 1,000円 商品Ｃ 売上 ３個 １５００円 と、一つの商品ごとに売上の行と返品の行に 分かれてて、必ずしも売上と返品があるとは限らない場合、 商品Ａ 売上 ２個 1,000円 返品 １個 -５００円 というように、１商品を一行にまとめたいのですが、なにかいい方法はありますでしょうか？ 行数が多いので、一個一個移動させるのは 無理そうです。
- ベストアンサー
- Excel（エクセル）
- エクセルで各品毎の合計を出すには
エクセルで納品書を作ったのですが、 何軒もある顧客の納品書の中から、共通した商品の合計価格を 自動で計算させるにはどのようにすればいいでしょうか？ 例えば、A B C D という名前の顧客があって、あ い う え お という商品があり、 A～D の （あ）なら（あ） という商品の売り上げ数と売上合計金額を出したい。という感じです。 （あ～お まで、全部出るようにしたいです） 商品の単価は顧客毎に、少し違っていたりします。 vlookup関数を使うのかなぁ、とか思ったりするのですが、納品書は何枚にもなっているし、 データベース？（よく分かってません）みたいなのを使うのかな、とか。 分かりやすく教えてもらえるとありがたいです。 エクセル2010です。 エクセル2003の場合も教えてもらえると、なおありがたいです。 書き足らないところがあれば言って下さい。 よろしくお願いいたします。
- 締切済み
- その他MS Office製品
- エクセルで2つのセルの合計から最小値検索
エクセルで2つのセルの合計の一番小さい合計のものが どの区分か、その値はどれかを検索したいのですが、 前にことらで質問して回答していただいたものを参考に 考えてみたのですが、INDEX、MATCHと組み合わせてもうまく検索 できませんでした．．． 分かる方おられましたら、どうか教えていただきたいです よろしくお願いします。 データはＢ2～Ｘ4まではいっていて、（実際にはもっとたくさん行があります） Ｙ列には、3行目と4行目の商品の列の合計の一番小さいものの 区分を表示したく、 Ｚ列にはその値を表示したいのですが、 欲をいえば合計の行を追加しなくてもＹ列Ｚ列に表示させることは 可能でしょうか？ Ｂ列 Ｃ列 Ｄ列 E列 Ｘ列 Ｙ列 Ｚ列 2行目 区分 1区分,2区分,10区分、、、5区分 3行目 りんご1 3 、 15 、 20 、、、1 5区分 1 4行目 りんご2 15 、 10 、 6 、、、12 5区分 12 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルで下の行から合計とかを求めたいです。
ほぼ毎日最終行の所にA列に日付 B/C/D/列に数値を加えているという作業を繰り返しています。従って下の方が最近入力した値になっている状態です。 私がしたいのはこの最近入力した(最終行)行から5行上までの各列の合計や平均値をそれぞれ1番上の方に自動で表示したいのですがいろいろと調べても分かりません。（行を追加するたび範囲を指定し直すというのがつらいです。） このような事はエクセル2003で可能でしょうか？ 調べた中では最終行を取得するとか最終行の値を表示するというのは見つけれたのですがここ何日も悩んで解決できません。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルでそれぞれの合計を纏めたい
以下のようなデータ（膨大です）があるのですが、 9月1日 A（商品名）XA（単価）YA（売上数）ZA（単価×売上数） B XB YB ZB C XC YC ZC … 9月2日 A XA YA ZA B XB YB ZB C XC YC ZC … 表にするとかえって分かりにくいですが、要するに商品が400種類くらいあって、9月1日～30日の間にそれぞれ売上があったというわけです。 その400種類の商品の9月分のそれぞれの売上個数の合計と、それぞれの売上金額の合計を算出したいのです。つまり 9月 A XA YA合計 ZA合計 B XB YB合計 ZB合計 C XC YC合計 ZC合計 … というように纏まった表を作りたいのです。 説明が下手で本当に恐縮ですが、エクセルで私の望むような計算はできますでしょうか？
- ベストアンサー
- オフィス系ソフト
補足
ありがとうございます！ とても興味深いです。 もう少し、詳しくお教え願えますか？ 空白の2行の表までは作りました。 質問１ 小計の合計欄に入れる数式、（当初Ｅ４）は =SUM(E2:E3) でいいのでしょうか。 行が増えていったらおかしいですよね？ 質問2 空白の1行目に日付からデータを入力し始めた時、 どのセルに入力しても、エラー表示が出ます。 実行時エラー1004 アプリケーション定義またはオブジェクト定義のエラーです。 デバック If j <> 4 Or Cells(i, 5) = "" Then Exit Sub が黄色表示 質問３ 1行目の入力が終わっても上記のエラーで新しい1行は増えません、 しかし、空欄の2行を入力すると、1行目のコピーが1行増えます。 わたしは、関数は理解していますが、ＶＢはさっぱりです。 出来れば、一連のコードに書かれている意味をお教え願えませんでしょうか。 ずうずうしくて申し訳ないんですが。