Автоматическая настройка строк в соответствии с таблицей, чтобы скрыть / показать

Question

Я хочу создать двойную кнопку переключения, чтобы показать и скрыть определенные строки. Я использовал следующий код VBA, чтобы сделать то же самое. Я застрять в том, как обеспечить автоматическую настройку строки нет. / Ссылка, так что если я удаляю или добавляю строку, код автоматически настраивает значения строки в соответствии с таблицей, которую мне нужно скрыть и показать.

CODE

Private Sub ToggleButton1_Click()        
    Dim xAddress As String         
    xAddress = "9:29"

    If ToggleButton1.Value Then 
        Application.ActiveSheet.Rows(xAddress).Hidden = True        
        ToggleButton1.Caption = "Show"        
    Else
        Application.ActiveSheet.Rows(xAddress).Hidden = False        
        ToggleButton1.Caption = "Hide"        
    End If
End Subs