質問: ### 前提・実現したいこと ●現在、集計マクロを作成しようとしています。 ○集計するのは表示されている日付の人数です。 他の日はセルを非表示にしていますが、値を保持しておいて集計には含めないようにしたいと考えています。 関数のSUMTOTALでは私が欲しい値が得られず悩んでいます。 ### 試したこと まだ作業を始めたばかりなのでソースコードは無いです。 今後、集計日が変わるかもしれないのでVBAが扱えない人でも簡単に修正が出来るようにしたいです。 案1 上記質問のように表示列のみ集計するマクロを作成 案2 表示列は色つきのセルにし、色つきセルだけ集計するマクロを作成 ### 補足情報(FW/ツールのバージョンなど) 使用しているエクセルはExcel2013です。
回答: 返事が遅くなり、申し訳ございませんでした。 上司から解決コードを連携していただいたのでそちらを参考に致します。 回答してくださった皆さんありがとうございました。 このソースコードなら来年以降の表示列(集計日)の変更にも対応できるとの事です。 ``` Public Function MG(rng As Range) Application.Volatile '自動再計算 Dim C As Range For Each C In rng If Not C.EntireColumn.Hidden And Not C.EntireRow.Hidden Then MG = MG + C.Value End If Next End Function ``` 追記 上記で回答頂いたSUBTOTAL関数ですが、質問をする前に調べて実際に動かしてみたのですが、非表示列の数値も集計してしまう上にオートフィルタを使わないと非表示列を集計してしまうようなので今回作るツールでは要件が変わってしまうのでSUBTOTAL関数の使用はやめました。 色での取得も出来たのですが上司から非表示列で取得できる方法があると思うからそっちで完成させろと言われたので色での取得はやめました。