行・列の表示・非表示(Hidden プロパティ)
Hidden プロパティ
Hidden プロパティに True を設定することで、行または列(Range オブジェクト)を非表示にします。また、Falese を設定すると、再表示させることができます。
<取得>
result = Object.Hidden
<設定>
Object.Hidden = boolean
引数・戻り値
- object ・・・ 行または列の集合となる Range オブジェクトを指定します。
Rows プロパティ、Columns プロパティ、任意のセル範囲に対する EntireRow プロパティ、 任意のセル範囲に対する EntireColumn プロパティ - result ・・・ 非表示の場合、True、非表示でない場合、False
Rows プロパティまたは、Columns プロパティに引数を指定せずに取得したセル範囲に対して、Hidden プロパティの値を False に設定することで、非表示にされているセル範囲をすべて再表示することができます。(フィルターの結果によって非表示になっているセル範囲は除きます)
非表示の行または列があるかを確認する場合、1行毎または1列毎に確認します。
フィルターの結果によって非表示になっているセル範囲に対して、Hidden プロパティに False を設定しても再表示することはできませんが、Hidden プロパティの値を取得することは可能です(フィルターで非表示になっている場合も True を返します)。
Hidden プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 |
Sub Sample_Hidden() Dim myRng As Range Dim HRowCnt As Long '非表示の行数 Dim HColCnt As Long '非表示の列数 Dim i As Long Set myRng = Range("A1").CurrentRegion 'フィルター myRng.AutoFilter _ Field:=3, _ Criteria1:=Array("男"), _ Operator:=xlFilterValues 'セル範囲「A7:C8」を含む行を非表示にする Range("A7:C8").EntireRow.Hidden = True 'B列を非表示にする Columns(2).Hidden = True '非表示の行数を求める For i = myRng.Cells(1).Row To myRng.Cells(myRng.Cells.Count).Row If Rows(i).Hidden = True Then HRowCnt = HRowCnt + 1 End If Next i '非表示の列数を求める For i = myRng.Cells(1).Column To myRng.Cells(myRng.Cells.Count).Column If Columns(i).Hidden = True Then HColCnt = HColCnt + 1 End If Next i MsgBox "非表示の行数:" & HRowCnt & Chr(13) & _ "非表示の列数:" & HColCnt End Sub |
実行結果
サンプルVBA 実行前
実行
関連記事
-
-
セルの位置を取得(Left プロパティ、Top プロパティ)
Left プロパティ・Top プロパティ Left プロパティは、「A列」の左端 …
-
-
オートフィルタの状況を確認(AutoFilterMode, FilterMode)
AutoFilterMode プロパティ AutoFilterMode プロパテ …
-
-
数式を設定・取得する(Formula プロパティ・FormulaR1C1 プロパティ)
Formula プロパティ(FormulaR1C1 プロパティ) Formula …
-
-
文字列の横位置を取得・設定する(HorizontalAlignment プロパティ)
HorizontalAlignment プロパティ HorizontalAlig …
-
-
セルを参照する(Range プロパティ)
Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …
-
-
フリガナの取得(GetPhonetic メソッド)
GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …
-
-
フリガナ(Phonetics プロパティ)
Phonetics プロパティ Phonetics コレクションを返します。値の …
-
-
セル・セル範囲を貼り付ける(Paste メソッド)
Paste メソッド Paste メソッドは、クリップボードの内容を指定したセル …
-
-
オートフィルタ(日付フィルタ)AutoFilter メソッド
日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …
-
-
セルの高さ・幅を取得(Height プロパティ・Width プロパティ)
Height プロパティ・Width プロパティ Height プロパティは、指 …