我已经弄清楚了自动电子邮件的模块,但没有幸运地将数据从UserForm传递到该模块。因此,我创建了另一个小模块,看看什么可能对我有效,但没有运气。所以第一个UserForm如下所示: Private Sub CommandButtonCancel_Click()
Public Sub CommandButtonOK_Click下一步是测试表单中的数据是否可以传递给模块。
我在Word和Excel上和VBA一起工作。我有一个单词运行一个用户表单,它将自动打开一个Excel文件。用户应该在Excel文件中填写一些数据,然后返回到Word userform。当用户完成在Word userform中填充所有字段时,它将在Word上运行一些VBA代码,将数据从Excel复制到Word。完成后,Excel文件将自动关闭。如果用户关闭Excel应用程序窗口,它将显示一个消息框,询问用户是否仍在使用单词userform。Word Te
我设计了UserForm1。这就是ComboBox。我想在一个模块中打开UserForm1,从ComboBox中选择一些东西,在UserForm1中单击OK之后,ComboBox应该被分配给模块中的变量,代码应该进一步运行。我定义了公共UserForm: Public Sub UserForm_Initialize()
Dim wsRoadmap As WorksheetMe.ComboBox1.Clear