22、Excel VBA：消息框替代方案、形状操作与加载项创建

Excel VBA：消息框替代方案、形状操作与加载项创建

1. 消息框的替代方案：使用 Office 助手

在 Excel 中，通常可以使用消息框与用户进行交互，以专业的方式显示简单消息。但如果想以更有趣的方式展示信息和选项，可通过编程让 Excel 的 Office 助手显示不同图形和气球消息，还能自定义选项供用户选择。

Office 助手是在请求帮助时出现的动画角色，常见为带眼睛的回形针图标，不过也有其他动画角色可选。它的工作方式与简单消息框类似，但有更多动画选择，还能自定义选项按钮，这是消息框无法做到的。

需要注意的是，要使相关代码生效，必须在 Excel 选项中开启 Office 助手，否则代码不会有任何效果。

以下是具体操作步骤：
1. 添加命令按钮 ：在电子表格菜单中选择“视图”|“工具栏”|“控件工具箱”，打开控件图标工具箱。找到“命令按钮”图标，将其拖到电子表格上（如果使用 Office XP，可能需要手动绘制）。若不确定哪个是命令按钮图标，可通过工具提示查看。右键单击按钮，从弹出菜单中选择“属性”，将“Caption”属性改为“Office 助手”。
2. 编写代码 ：双击新添加的按钮，进入“Click”事件的代码窗口，输入以下代码：

Private Sub CommandButton1_Click()
Dim ball As Balloon
Set ball = Application.Assistant.NewBalloon
With ball
    .Heading