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

现在可以绘制一个按钮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)

相关推荐