单击用户窗体中的按钮时调用vba代码

时间:2019-08-20 07:17:19

标签: excel vba

我创建了以下简单的UserForm1,其中包含CommandButton1 = YesCommandButton2 = No

enter image description here

我通过以下VBA将此称为UserForm1

Sub Open_Userform()
Call UserForm1.Show(vbModeless)
End Sub

到目前为止,所有这些都工作正常。


现在,我希望如果用户单击CommandButton1,则会调用以下VBA:

Sub Finish_Process()
Sheet1.Range("A1").Value = 1
End Sub

因此,我在UserForm1中向CommandButton1添加了以下代码:

Private Sub CommandButton1_Click()
Call Finish_Process
End Sub

但是,现在当我单击CommandButton1时,我会收到错误消息Sub or Function not defined

我需要在代码中进行哪些更改才能使其正常工作?

1 个答案:

答案 0 :(得分:0)

如评论中所述,如果将Sub Finish_Process ()存储在模块中而不是在“此工作表”中,则可以解决此问题。