就用一个按钮来控制显示不显示公式栏

现在可以绘制一个按钮1，编写如下代码,让其不显示。

以下代表可以录制一个宏，点击视图，编辑栏，再查看相应的代码，如果这个不会操作，请参考以前的教程，本教程为VBA连载，可以翻阅以前的几十篇章教程。

Private Sub CommandButton1_Click() Application.DisplayFormulaBar = FalseEnd Sub

也可以绘制一个按钮2，编写如下代码,让其不显示。直接将false改为true即可。

Private Sub CommandButton2_Click() Application.DisplayFormulaBar =TrueEnd Sub

这样就需要两个按钮

如何用一个按钮，点击一下隐藏，再点击一下显示呢？

套用以前学过的分支语句就可以实现。

学一学思路，先来一段中文，逻辑如下：

如果状态栏显示，则将其不显示，如果状态栏不显示，则将其显示。

VBA语法规则

如果  对象.属性=FALSE 那么

对象.属性=TRUE

否则

对象.属性=FALSE

结束如果

完整的语句如下：

Private Sub CommandButton1_Click() If Application.DisplayFormulaBar = False then Application.DisplayFormulaBar = True Else Application.DisplayFormulaBar = False End ifEnd Sub

一个按钮就可以实现，点击一次隐藏，再点一次显示。

这样一来，很多菜单级的操作，我们都可以自己做一个按钮来实现。

子曰：用之则行，不用则藏。

意思是说，如果你用我的这些建议，就马上行动，知行合一，如果你不用，就赶紧收藏，以绝后患。

赞 (0)

相关推荐