Excel 非表示の列を飛ばして合計できる関数ってありますか？

Excelで、非表示にした列をのぞいて合計する関数はありますか？
例えば、A1からE1まで数値が入っていて、C列が非表示になってるとします。
残りのA1,B1,D1,E1だけを合計できる関数ってありますでしょうか？

No.1 ベストアンサー 回答者： marbin 回答日時： 2009/01/08 20:27

オートフィルタで抽出した結果非表示になっているのなら

SUBTOTAL関数
が使えますが、手作業で非表示にした場合は使えないようです。

http://www.fujicom.co.jp/salon/it_info/44/44.html

ユーザー定義関数を作ってみました。
miesumの変数の型をVariant型にしていますが、適切な型があったら
変更してください。

Function miesum(ByVal r As Range) As Variant
Dim c As Range
For Each c In r
If c.EntireColumn.Hidden = False Then miesum = miesum + c.Value
Next
End Function

この回答へのお礼

関数ではできないのですね。
ありがとうございました。

お礼日時：2009/01/24 09:43

No.2 回答者： marbin 回答日時： 2009/01/08 20:31

#1です。

ユーザー定義関数の修正版です。

Function miesum(ByVal r As Range) As Variant
Dim c As Range
For Each c In r
If c.EntireColumn.Hidden = False And c.EntireRow.Hidden = False Then miesum = miesum + c.Value
Next
End Function

非表示は行列ともありえますので・・・。