excel怎么用VB自动隐藏显示

excel怎么用VB自动隐藏显示

添加一个按钮吧， 选菜单：视图》工具栏》控件工具箱 点左上角的 三角尺＋直尺＋笔 的图标，进入设计模式 点“命令按钮”（就是刚才按钮的对下3个，一个按钮模样的键） 在工作表某个位置，如a1单元格上画一个长方形，得到按钮。 选“按钮”点右键，在右键菜单中选“查看代码” 在出现的visual basic 编辑器窗口，右边的代码 Private Sub CommandButton1_Click() End Sub 在上面两行代码的中间粘贴下面的代码： If Columns("B:D").EntireColumn.Hidden = False ThenColumns("B:D").EntireColumn.Hidden = TrueElseColumns("B:d").EntireColumn.Hidden = FalseEnd IfRange("A2").Select返回工作表，点“三角尺”按钮，退出设计模式。 点按钮。 OK。