18、自定义对话框与控件使用全解析

自定义对话框与控件使用全解析

1. 自定义对话框示例

在这个示例中，我们要创建一个增强版的 ChangeCase 宏。原始的 ChangeCase 宏会将所选单元格中的文本转换为大写，而这个修改后的版本会使用自定义对话框让用户选择转换类型：大写、小写或正确大小写。

1.1 创建自定义对话框

以下是创建自定义对话框的步骤：
1. 打开一个空工作簿，按下 Alt + F11 激活 VBE（Visual Basic 编辑器）。
2. 如果项目窗口中有多个项目，选择你正在使用的工作簿对应的项目。
3. 选择“插入”➪“用户窗体”，VBE 会插入一个带有空对话框的新用户窗体对象。
4. 按下 F4 显示“属性”窗口。
5. 在“属性”窗口中，将对话框的“Caption”属性更改为“Change Case”。
6. 对话框有点大，你可以点击它并使用手柄将其缩小。这一步也可以在对话框中所有控件定位后进行。

1.2 添加命令按钮

要向对话框中添加“OK”和“Cancel”两个命令按钮，可按以下步骤操作：
1. 确保工具箱已显示。如果未显示，选择“视图”➪“工具箱”。
2. 如果“属性”窗口不可见，按下 F4 显示它。
3. 在工具箱中，将一个“CommandButton”拖到对话框中创建一个按钮。在“属性”框中，你会看到该按钮有默认的名称和标题：CommandButton1。
4. 确保选中该命令按钮，然后激活“属性”窗口并更改以下属性：
| 属性 | 更改后的值 |
| ---- | ---- |
| Name | O