希望设置两个控件分别展示不同的页面视图

阳光暖洋洋

求助各位大神：

     希望设置两个控件“评估报告附表视图”与“评估底稿视图”
     两个控件，点击“评估报告附表视图”，则与底稿相关的区域隐藏；
                    点击“评估底稿视图”，则与报告相关的“被评估单位填表人员、填表日期、评估人员”两行信息隐藏；
      

黄超-传输6506

Private Sub 评估报告附表视图_Click()
Application.ScreenUpdating = False
For i = 11 To 22
    Columns(i).Hidden = True
Next i
For ii = 1 To 10
Columns(ii).Hidden = False
Next ii
Application.GoTo Reference:=Worksheets("其他应收款").Range("A1"), Scroll:=True
Application.ScreenUpdating = True
End Sub
Private Sub 评估底稿视图_Click()
Application.ScreenUpdating = False
For i = 1 To 10
    Columns(i).Hidden = True
Next i
For ii = 11 To 22
Columns(ii).Hidden = False
Next ii
Rows("35:36").Hidden = False
Application.GoTo Reference:=Worksheets("其他应收款").Range("K1"), Scroll:=True
Application.ScreenUpdating = True
End Sub

阳光暖洋洋

老师，非常感谢您的回复，“评估报告附表视图”完全满足我的需求。
但是“评估底稿视图”，我想展示的是 1 To 22（图里红色框全部），共计23列完全展示出来。