excel怎么用VB自动隐藏显示
发布网友
共2个回答
热心网友
添加一个按钮吧，
选菜单：视图》工具栏》控件工具箱
点左上角的 三角尺＋直尺＋笔 的图标，进入设计模式
点“命令按钮”（就是刚才按钮的对下3个，一个按钮模样的键）
在工作表某个位置，如a1单元格上画一个长方形，得到按钮。
选“按钮”点右键，在右键菜单中选“查看代码”
在出现的visual basic 编辑器窗口，右边的代码
Private Sub CommandButton1_Click()
End Sub
在上面两行代码的中间粘贴下面的代码：
If Columns("B:D").EntireColumn.Hidden = False Then
Columns("B:D").EntireColumn.Hidden = True
Else
Columns("B:d").EntireColumn.Hidden = False
End If
Range("A2").Select
返回工作表，点“三角尺”按钮，退出设计模式。
点按钮。
OK。
热心网友
有需求的话留Q发文件，给你解决这个问题
