行の非表示と再表示のマクロ

行の非表示と再表示

Hiddenプロパティで指定した行を非表示にします。
コードのTrueをFalseに変更すると、再表示になります。

Rowsプロパティ

Rows(2).Hidden = True
[color color=”Blue”] ’行2を非表示にします[/color] 
Rows(2).Hidden = False
[color color=”Blue”] ’行2を再表示します[/color]

サンプルコード
[aside type=”normal”]コード内、Wクリックでコピーできます。[/aside]
Sub サンプル2770()
     
    Rows(2).Hidden = True
    
    'Rows(2).Hidden = False
 
End Sub

Rangeプロパティ

Range(“A3″).EntireRow.Hidden = True
[color color=”Blue”] ’行3を非表示にします[/color] 
Range(“A3″).EntireRow.Hidden = False
[color color=”Blue”] ’行3を再表示にします[/color]

サンプルコード
[aside type=”normal”]コード内、Wクリックでコピーできます。[/aside]
Sub サンプル2772()
     
    Range("A3").EntireRow.Hidden = True
    
    'Range("A3").EntireRow.Hidden = False
 
End Sub

行の範囲を指定して非表示と再表示

Rowsプロパティ

Rows(“2:4″).Hidden = True
[color color=”Blue”] ’行2~行4を非表示[/color] 
Rows(“4:4″).Hidden = True
[color color=”Blue”] ’行4を非表示[/color]

サンプルコード
[aside type=”normal”]コード内、Wクリックでコピーできます。[/aside]
Sub サンプル2773()
     
    Rows("2:4").Hidden = True
    
    'Rows("4:4").Hidden = True
     
End Sub

Rangeプロパティ

Range(“A2:A4″).EntireRow.Hidden = True
[color color=”Blue”] ’行2~行4を非表示[/color] 
Range(“A2,A4″).EntireRow.Hidden = True
[color color=”Blue”] ’行2と行4を非表示[/color]

サンプルコード
[aside type=”normal”]コード内、Wクリックでコピーできます。[/aside]
Sub サンプル2774()

    Range("A2:A4").EntireRow.Hidden = True
     
    'Range("A2,A4").EntireRow.Hidden = True
     
End Sub

指定したシートの行を非表示にする

シート2(Sheet2)を指定するには、Worksheets(“Sheet2”) または Worksheets(2) とします。

[color color=”Blue”] ’Sheet1 の行を非表示[/color] 
Worksheets(“Sheet1″).Rows(2).Hidden = True
Worksheets(1).Rows(2).Hidden = True

[color color=”Blue”] ’Sheet2 の行を非表示[/color] 
Worksheets(“Sheet2”).Rows(2).Hidden = True
Worksheets(2).Rows(2).Hidden = True

サンプルコードは、Sheet2の行2を非表示にします。

サンプルコード
[aside type=”normal”]コード内、Wクリックでコピーできます。[/aside]
Sub サンプル2775()
  
    Worksheets("Sheet2").Rows(2).Hidden = True
    
    'Worksheets(2).Rows(2).Hidden = True
    
End Sub

●マクロの実行結果
heet2を開いてみると、行2が非表示になっています。

[article id=”4213″ cat_name=”1″ layout=”list”]

以上で「行の非表示と再表示のマクロ」の説明を終わります。