作者：乔山办公网日期：
返回目录：excel表格制作
隐藏行代码：
Sub aa()
For i = 1 To 10
Rows(i).Hidden = True
Next i
End Sub
取消隐藏代源码：
Sub bb()
For i = 1 To 10
Rows(i).Hidden = False
Next i
End Sub
打开EXCEL后按Alt+F11键，进入VBE编辑器，复制粘贴上面的代百码。
切换到Excel表格，执行开发工具-宏度-插入-表单控件，选择按纽问后，插入，为按纽指定宏，分别指向aa和bb这两个宏名，然后就可以使用答了。点第一个按纽，隐藏行，点第二个按纽，取消隐藏。
感觉你补充的问题也打知错了
假设是当f1的值为“隐藏”时，隐藏a列，道b列和c列；当f1的值为“显示”，取消隐藏a列，b列，c列。
用VBA可以做到，回需启用宏，或者另存为启用宏的工作簿
右键工作表标签，选择查看代码
粘贴以答下代码并保存
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Target.Address = "$F$1" Then
If Target = "隐藏" Then Columns("A:C").EntireColumn.Hidden = True
If Target = "显示" Then Columns("A:C").EntireColumn.Hidden = False
End If
End Sub
已上传附件，亲测可用
Sub Macro1()
Cells.Select
Selection.EntireRow.Hidden = False
Selection.EntireColumn.Hidden = False
Range("A1").Select
End Sub
工具/材料：Microsoft Office Excel2007版，Excel表格。
1、首先选中Excel表格，双击打百开。
2、然后在该界面中，显示第三行被隐藏。
3、再者在该界面中，右键点击“度查看代码”选版项。
4、其次在宏界面中，输入宏代码“Sub Macro1() Rows("3:3").Select Selection.EntireRow.Hidden = False Rows("4:4").Select Selection.EntireRow.Hidden = True End Sub”。
5、继续在宏界面中，点击“执行”按钮。
6、最后在该界面中，显示第三行显示，第四权行被隐藏。