フィルタ解除して全データを表示（ShowAllData メソッド）

サイト管理人

8年前

ShowAllData メソッド

AdvancedFilter メソッドや AutoFilter メソッドによりデータが抽出されている状態（フィルタモード）の時に、ShowAllData メソッド を実行するとフィルタモードが解除されすべてのデータを表示します。

【書式】

object.ShowAllData

引数・戻り値

object ・・・対象となる Worksheet オブジェクト または、AutoFilter オブジェクト を指定します。
fromreferencestyle ・・・

フィルタモードでない状態のとき、ShowAllData メソッドを実行するとエラーが発生します。フィルタモードかどうかを確認するには、FilterMode プロパティを使用します。

ConvertFormula メソッド使用例

サンプルVBAソース

　
Sub Sample_AdvancedFilter()

    'データの抽出
    Range("B8").CurrentRegion.AdvancedFilter _
        Action:=xlFilterInPlace, _
        CriteriaRange:=Range("B2").CurrentRegion

End Sub

Sub Sample_ShowAllData()

    'すべてのデータを表示
    If ActiveSheet.FilterMode Then
    ActiveSheet.ShowAllData
    End If

End Sub

Sub Sample_AdvancedFilter()

'データの抽出

Range("B8").CurrentRegion.AdvancedFilter _

Action:=xlFilterInPlace, _

CriteriaRange:=Range("B2").CurrentRegion

End Sub

Sub Sample_ShowAllData()

'すべてのデータを表示

If ActiveSheet.FilterMode Then

ActiveSheet.ShowAllData

End If

End Sub

実行結果

Sub Sample_AdvancedFilter() 実行後（データ抽出）

Sub Sample_ShowAllData() 実行後（全データ表示）

ShowAllData メソッド

引数・戻り値

ConvertFormula メソッド 使用例

サンプルVBAソース

実行結果

ConvertFormula メソッド使用例