vbaを使用してExcelの隠し行を拡張するにはどうすればよいですか？

Question

私は100行のスプレッドシートを持っています。これらの100行の中で、最初は10行のみが表示されなければならず、最初は他の90行を折りたたまなければならない（非表示にする）。ユーザーが100行全体を読みたい場合、ボタンをクリックして10行から100行のスプレッドシートを展開できます。 VBAでこの種の機能を実装する方法は？

Answer 1

は、コマンドボタンを使用することができます

Private Sub CommandButton1_Click() 

    '// Label button "Show Rows" 
    With Me.CommandButton1 
     If .Caption = "Show Rows" Then 
      .Caption = "Hide Rows" 
      Rows("11:100").Hidden = False 
     Else 
      .Caption = "Show Rows" 
      Rows("11:100").Hidden = True 
     End If 
    End With 

End Sub 

またはトグルボタン：

Private Sub ToggleButton1_Click() 
    '// Label Something Like "Show/Hide Rows" 
    Rows("11:100").Hidden = Not ToggleButton1.Value 
End Sub