エクセルの関数について

質問

エクセルの関数について教えてください。
あるシートに数字を入力の列があり、合計を出すようにしています。
この数字に取り消し線を付けた場合には、合計からはずした形で合計を出したいのですが、このような関数があるのでしょうか。
よろしくお願いいたします。

回答No.2

Wendy02

こんばんは。

それは、たぶん、VBAを見越しての質問のような気がします。
確かに、一般関数ではありません。

初歩的なコードですが、これで合計は出ます。

'標準モジュール

Function SumStrikes(mRng As Variant)
　　Dim c As Range
　　Dim dTotal As Double
　　If TypeName(mRng) = "Range" Then
　　　　For Each c In mRng
　　　　　　If VarType(c) = vbDouble Then
　　　　　　　　If c.Font.Strikethrough = False Then
　　　　　　　　　　dTotal = dTotal + c.Value
　　　　　　　　End If
　　　　　　End If
　　　　Next c
　　End If
　　SumStrikes = dTotal
End Function

数式の入れ方
=SumStrikes(A1:A10)

回答No.1

piro19820122

関数はセルの値を対象にするもので、セルの書式を読み取るようなものはなかったと思います。
別の欄に合計に算入するかどうかのフラグを付ける列をもうけて、SUMIFと条件付き書式で合計と取消線を入れるようにする、という対応ならできるかと思います。