[[20040830143349]]　『エラーを除いて合計を出したい』（ぴろ）　ページの最後に飛ぶ

『エラーを除いて合計を出したい』（ぴろ）

    A     B         C
1  新潟	100	#VALUE!
2  長野	200	150
3  山梨	#VALUE!	50
4  群馬	300	200
5  合計	600	400

上記のような表で5行目の合計でSUMをすると
　
#VALUE!とエラーが表示されますが、

そのエラーを除いて数字を合計してくれる

関数はありますか？

教えて下さい。宜しくお願いします。

 エラーを避けて合計を計算する工夫をするよりも、#VALUE! となっているセルに
 エラーが出ないようにする事を考えた方がよくないですか？IF文を使って、エラーなら
 空白にするとか 0 にするとかしましょう。（純丸）

 どうしてもと仰有るならこんな関数どうでせうか？
 [Alt]+[F11]でVBEを開く
 「挿入」←「標準モジュール」選択
 下のコードをコピペ
 戻って

 SUMの変わりに=piro(範囲)を入力
 せやけど、#VALUE!なんて表示されとったら見苦しいもんですワ。元の式でエラーの
 出んように考えるべきでせう。
   　（弥太郎）
 '-----------------------
 Function piro(data)
    Dim i As Integer
    Dim tbl

    tbl = Range(data.Address)
    For i = LBound(tbl, 1) To UBound(tbl, 1)
        If IsNumeric(tbl(i, 1)) And Not IsError(tbl(i, 1)) Then
            piro = piro + tbl(i, 1)
        End If
    Next i
 End Function

（純丸）さん、（弥太郎）さん、ありがとうございました。

確かに#VALUE!だらけで見づらかったので、

おっしゃる通り、元の式でエラーがでないように変えました。（ぴろ）

コメント返信：

[ 一覧(最新更新順) ]

[[20040830143349]] 『エラーを除いて合計を出したい』（ぴろ） ページの最後に飛ぶ

[[20040830143349]]　『エラーを除いて合計を出したい』（ぴろ）　ページの最後に飛ぶ