宏MS Word和Excel弹出消息框,其中包含复选框

时间:2017-01-17 15:09:13

标签: excel vba ms-word

我在Word和Excel中不是Marco的新手。我通过使用录音做简单的宏。但是我希望增强我的一些任务,并将其变得如此简单。

我的问题是查找和替换一些文本字符。我在屏幕上有这个粘滞便笺并手动复制并粘贴到查找和替换“Ctrl + H”。

我想要的是最小化它,因为我得到了很多报告,需要运行这个特定的查找和替换任务。

但是我遇到了如何让它弹出消息框,它会有一个复选框,所以我可以运行所有查找和替换。

我附上了一个图像文件以供参考,我想让它在Excel和Word中制作。 Please Click here for image.

2 个答案:

答案 0 :(得分:0)

这是使用VBA替换单词的想法。我提供的示例代码采用了您想要替换的单词数组,并将其替换为第二个数组的单词。这可以让你找到几个单词,一次也可以同时替换它们。你还可以进一步做一个输入框或表单来加载数组。

String

答案 1 :(得分:0)

如果您想使用复选框创建用户表单,请按照添加模块的方式创建用户表单 - >单击项目窗口,右键单击,添加UserForm。然后单击“工具箱”图标并选择一个复选框,您可以在用户窗体中找到该复选框。

enter image description here

加上一些youtube视频: https://www.youtube.com/watch?v=5oXcct1mOUw

编辑,假设您在userform中有一个按钮和一个复选框。这是userform中的代码。

按钮的名称是cmd_Calculator; 复选框的名称是chb_new

Private Sub cmd_Calculator_Click()

    If Me.chb_new Then
        MsgBox "Checkbox is selected."
    Else
        MsgBox "Checkbox is not selected."
    End If

End Sub