Excel一键提取状态栏内容技巧

       基于VBA手艺实现单击控件按钮，一键提取状况栏内容技巧。本教程以点击按钮后，弹窗显示状况栏内容为例。

工具/原料

• Excel
• 教程以13版Excel为例

方式/步骤

1. 1

   本教程就以新建Excel文档为例，双击打开，另存为启用宏的工作簿，后缀名为xlsm。

   
2. 2

   此时Excel文档的状况栏，如图所示。

   
3. 3

   插入一个ActiveX控件，本教程以号令按钮控件为例。

   PS：挪用ActiveX控件操作技巧可以参考一下链接

   34Excel插入ActiveX控件技巧

   
4. 4

   绘制好控件之后，右键单击该按钮，选择查看代码。

   
5. 5

   此时会跳转到VBA窗口，并弹出一个代码窗口。

   
6. 6

   在代码窗口中复制粘贴以下代码：

   Private Sub CommandButton1_Click()

       Dim k$

       k = Application.StatusBar

       MsgBox k

   End Sub

   
7. 7

   封闭VBA窗口，回到Excel窗口界面，单击按钮即可弹出显示状况栏内容。

   

注重事项

• 教程中所说起的单击或点击，均指鼠标左键单击操作。
• 若是对您有点帮忙，请帮手点个赞再走，感谢！