在EXCEL中利用宏按钮执行分组显示?

来源:百度知道 编辑:UC知道 时间:2024/05/15 18:35:41
在一个工作表中的第一行建立三个宏按钮,名分别为A,B,C。按A钮,则显示第2到100行;按B钮,则显示第101到200行;按C钮,则显示201-300行。请问怎么实现?

用“控件工具箱”在第一行建立3个命令按钮。代码分别如下:
Private Sub CommandButton1_Click()
Rows("1:1").RowHeight = 30
Rows("2:65536").RowHeight = 0
Rows("2:100").RowHeight = 14.25
End Sub

Private Sub CommandButton2_Click()
Rows("1:1").RowHeight = 30
Rows("2:65536").RowHeight = 0
Rows("101:200").RowHeight = 14.25
End Sub

Private Sub CommandButton3_Click()
Rows("1:1").RowHeight = 30
Rows("2:65536").RowHeight = 0
Rows("201:300").RowHeight = 14.25
End Sub

工具--宏---Visudl Basic编辑器---插入--模块1
Sub Macro1()
'
'

'
Rows("1:1").Select
Selection.EntireRow.Hidden = True
Application.Goto Reference:="R101:R65536"
Selection.EntireRow.Hidden = True
End Sub

再插入模块2
Sub Macro2()
'
'
'<