ＥＸＣＥＬ２０００の関数の使い方について教えてください。

質問

続けて質問します。（内容は違いますが。。。）
ＥＸＣＥＬ２０００を使用しています。
帳簿を作成しています。
１月から１２月までそれぞれ別々のシートで作成しています。
各月のシートには売上を記入しています。
簡単に商品の仕入れをインプットし、売上をインプットすると利益が出るようになっています。
例えば１００円で仕入れたものを２００円で売れれば利益は１００円です。これは黒字ですのでいいのですが、問題は赤字の商品です。
何十もの商品のデータを入れていき赤字になったデータだけを別に設けたシートに表示させて累計させたいのです。
そういった、黒字は反映しないで赤字だけ反映させるような関数というのはありますか？
分かる方、宜しくお願いします。

回答No.3

imogasi · ベストアンサー

多分赤字分の合計計数だけを希望しているのではないでしょう。質問に商品明細が必要かどうか書くべきと思います。そういう前提で話しをします。
エクセルの関数は、
（１）値を他のセルから取ってきて自分のセルへセットすることは出来ます。他のセルの値で計算したものをセットできます。<=B1,=if(A1<0,B1,B1+C1)>
（２）自分のセル・他のセルの値を判断して（１）も出来ます。自分のセル・他のセルの値を計算に使えます。
判断の値に、自分のセル・他のセルの両方の値を計算した結果を使えます。<=if(A1+B1<0,"",A1+B1)>
●（３）しかし自分の値や他のセルの値を他のセルにセットできません。
A1セルで=B1=A1(Ａ１セルの値をＢ１にセットせよ）の風なことなどは出来ません。
あくまで受ける側のセルで、（Ｂ１セルの側で）=A1のように入れないといけません。
＜本件で考えると＞
簡略にするためＡ列に赤字計数が出ていると仮定し、
Ｂ、Ｃ・・・列に他の項目（商品名など）があるものとします。本説明では商品名だけにします。
上記（３）から別シート（Ｓｈｅｅｔ２とする）側に関数式を入れないとダメです。
それでＳｈｅｅｔ２のＡ１に
=IF(Sheet1!A1<0,Sheet1!A1,"")といれＡ２以下下にＳｈｅｅｔ１の行数分複写します。
Ｂ１には=IF(A1="","",Sheet1!B1)と入れ、Ｂ２以下に
Ｓｈｅｅｔ１の行数分複写します。
それでＳｈｅｅｔ１のＡ１：Ｂ５のデータが
-1 ノート
2 消しゴム
3 鉛筆
4 コンパス
-5 封筒
だとすると、Ｓｈｅｅｔ２のＡ１：Ｂ５は
-1 ノート（第１行）
　　　（第2行）　
　　　（第３行）　
　　　（第4行）
-5 封筒　（第５行）　
となります。
「封筒は第２行に行かせられないの？」これが難しいのです。
「第２行から第４行（黒字分）は行削除できないの？」
これが関数式で難しいのです。関数では行挿入・行削除が出来ないのです。「これで関数式だけで」で本件回答は出来ないことを判ってもらえたでしょうか。
（更なる解決法）
ＶＢＡになりますが、Ｓｈｅｅｔ２にコマンドボタンを
１つ貼り付けます。そして下記プログラムを作ります。
ボタンを押すと空白行を削除します。（関数式を使わずＶＢＡだけで赤字かどうか判断してＳｈｅｅｔ２にコピーするほうがまとも
ですが、関数と言うものの説明の成り行き上、出しました。）
Private Sub CommandButton1_Click()
i = 1
Worksheets("sheet2").Activate
r = Range("a1").CurrentRegion.Rows.Count
Range("a1").Select
p01:
If Cells(i, 1).Value = "" Then
Rows(i).Delete
Else
i = i + 1
End If
r = r - 1
If r = 1 Then Exit Sub
GoTo p01
End Sub

お礼

お礼が遅くなりました。
本当に申し訳ございませんでした。
皆さんの回答のおかげで、思い通りのグラフができました。
本当にありがとうございました。

回答No.2

kazuhiko5681

初めまして。あなた様のお考えになっていることは、マクロを組めば、簡単に自動で実行できるかと思います。もしよろしければ、サンプルマクロを作ってみたいと思います。
ご希望の節は、コピー・ペーストするだけで実行することができるマクロを作りたいので、仕入れ金額を入力してある列と売上金額を入力してある列をお知らせ下さい。
お手数をおかけいたしますが、よろしくお願いいたします。

お礼

お礼が遅くなりました。
本当に申し訳ございませんでした。
皆さんの回答のおかげで、思い通りのグラフができました。
本当にありがとうございました。

回答No.1

hinebot

SUMIF関数が使えるのではないでしょうか。

=SUMIF(範囲、検索条件、合計範囲）
という書式です。
範囲…評価の対象となるセル範囲を入れます
検索条件…計算の対象となるセルを定義する条件を入れます。今回の場合はマイナスの場合ということで"<0"で良いかと。
合計範囲…実際に計算の対象となる範囲を入れます。通常は、「範囲」と同じ指定でよいかと。（省略しても大丈夫です。）

お礼

お礼が遅くなりました。
本当に申し訳ございませんでした。
皆さんの回答のおかげで、思い通りのグラフができました。
本当にありがとうございました。