Sub 行のグループ化を解除する()
    
    Rows("2:9").Ungroup
    
End Sub