Excel テーブル ListObjects  関数だけで不可視か否か

Quick Edit Pencil
関数だけサブトータル1 可視を1からカウント
SUBTOTAL(3,INDIRECT(ADDRESS(ROW([BMN]),COLUMN([BMN]))):INDIRECT(ADDRESS(ROW([@BMN]),COLUMN([@BMN]))))
関数だけサブトータル2 可視を0からカウント
SUBTOTAL(3,INDIRECT(ADDRESS(ROW([BMN]),COLUMN([BMN]))):INDIRECT(ADDRESS(ROW([@BMN])-1,COLUMN([@BMN]))))
関数だけサブトータル1 - 関数だけサブトータル2 = 可視は1 : 不可視は0
SUBTOTAL(3,INDIRECT(ADDRESS(ROW([BMN]),COLUMN([BMN]))):INDIRECT(ADDRESS(ROW([@BMN]),COLUMN([@BMN]))))-SUBTOTAL(3,INDIRECT(ADDRESS(ROW([BMN]),COLUMN([BMN]))):INDIRECT(ADDRESS(ROW([@BMN])-1,COLUMN([@BMN]))))

関数だけVBAで確認
.Sub test()
    For Each cell In Range("a2:a33")
       Debug.Print cell.Row & ":" & cell.Offset(0, 3) & ":" & cell.EntireRow.Hidden
    Next
End Sub.
■■■ ユーザー定義がイケるなら ■■■
'ユーザー定義関数 不可視行が否か
Function IsHidden(セル As Range) As Boolean

    IsHidden = セル.EntireRow.Hidden

End Function

このブログの人気の投稿

簡単 らじるらじるの聴き逃し番組、NHKラジオのストリーミングを保存・ダウンロードする方法 2019

memo: ショートカットファイルを直接削除する

https://gemini.google.com/search?q=%5B%5BOralHistory%5D%5D

googleスプレッドシートで名前範囲内のデータが更新された時にタイムスタンプを更新

二号線を東へ

エラーを解決 再解析ポイントバッファーにあるタグは無効です。

カルチャーラジオ 日曜カルチャー「人間を考える 思いを伝えることば」