如何使用复选框在Excel中隐藏/取消隐藏行或列?
假设您需要使用复选框来隐藏或取消隐藏某些行或列。 例如,当Active X控件复选框被选中,则显示某些行或列,否则,它们将被隐藏。 本文向您展示了如何使用复选框来隐藏/取消隐藏Excel中行或列的详细信息。
使用复选框使用VBA代码隐藏/取消隐藏行或列
以下VBA代码可以帮助您通过复选框隐藏/取消隐藏某些行或列。
1.将Active X Control复选框插入工作表后,右键单击该复选框,然后选择
查看代码
从右键单击菜单中。 看截图:
2.在
Microsoft Visual Basic应用程序
窗口,将以下VBA代码复制并粘贴到“代码”窗口中。
VBA代码:使用复选框隐藏/取消隐藏行或列
Private Sub CheckBox1_Click()
[C:D].EntireColumn.Hidden = Not CheckBox1
End Sub
1.在VBA代码中,
[光盘]。 整列
表示通过选中或取消选中相应的复选框,可以隐藏或取消隐藏列C和D。
2.要隐藏或显示某些行(例如第6:9行),请更改[
光盘]。 整列
至
[6:9]。 整行
在VBA代码中
3。 按
其他
+
Q
同时关闭按键
Microsoft Visual Basic应用程序
窗口。
4.现在请关闭
设计模式
在下面
开发商
标签,如下图所示:
从现在开始,选中该复选框时,将显示指定的行或列。 取消选中时,指定的行或列将被隐藏。
相关文章:
如何在Excel中隐藏/取消隐藏带有加号或减号的行或列?
如何在Excel中根据今天的日期隐藏行?
在Excel中隐藏行时如何隐藏复选框?
最佳办公生产力工具
使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。
Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。
单击此处获取您最需要的功能...
免费下载...
Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读
,发布者,Access,Visio和Project。
在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
每天将您的工作效率提高50%,并减少数百次鼠标单击!
免费下载...
Bei mir werden die Zellen nicht ausgeblendet, wenn das Kontrollkästchen wieder in aktiv ist.
Mein Ziel ist es mit dem aktiveren des Kontrollkästchen die Zeile 7 einzublenden und wenn ich den Haken wieder entferne sollte Zeile 47 wieder ausgeblendet sein.
Hilfe....
The following VBA code can help.
Private Sub CheckBox1_Click()
[47:47].EntireRow.Hidden = Not CheckBox1
End Sub
The following VBA code can do you a favor. Please give it a try.
Private Sub CheckBox1_Click()
'Updated by Extendoffice 20220810
[C:C, A:A].EntireColumn.Hidden = Not CheckBox1
End Sub
Espero que todos estejam bem!
Tenho uma situação onde preciso ocultar / reexibir a coluna utilizando o Control ActiveX quando solecionado o item.
Exemplo: Tenho coluna com os nomes: Planejado, Realizado, Análise Vertical, Análise Vertical, Variação (R$) e Variação (%), no entanto, que poder selecionar individual as colunas intercalando se necessário. Selecionar somente a coluna Realizado e Variação, mesmo não estando na sequencia.
Desde já agradeço,
Welington
Sorry I don't understand what you mean. Would you mind providing a screenshot of your data?
You may need to attach a screenshot or a sample file to describe the problem you encountered more clearly.
Esse código oculta, mas não executa a reexibição quando desmarcar.
Alguém pode complementar por favor? Preciso de um código para ocultar e reexibir colunas indicadas.
Private Sub CheckBox1_Click()
[C:D].EntireColumn.Hidden = Not CheckBox1
End Sub
Obrigado
Hi Welington Mesquita,
This VBA code can acheive:
When the checkbox1 is checked, the column C:D are displayed;
When it is unchecked, the column C:D are hidden.
The code works well in my case. Which Excel version are you using?