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

このブログの人気の投稿

PowerShellのGetDetailsOf メソッドでプロパティの詳細情報のID番号と項目名を列挙します

書字方向 横書方向変換スクリプト 左書きから右書きへ(コピペ用途)

PowerShellで複数ファイルのプロパティを取得する方法(準備編)

ヤバい!JAPANNEXT WQHD対応 27型ワイド液晶ディスプレイ「JN-IPS2716WQHD」を注文してみた!!!

簡単 YouTube動画をダウンロード、音声のみ保存する方法 2019

PowerShell: 詳細情報から取得した日付のフォーマット

AppleScript 改行 コード 置換