全局定义和初始化用户表单

Question

我在模块的开头有以下代码（因此不能放在任何子目录中）：

Public frmG As UserForm
Public frmW As UserForm

另外，当工作簿打开时，它会执行以下操作：

Call SetVariables

SetVariables子包含以下内容：

Sub SetVariables()

  Set frmG = frmAddChild
  Set frmW = frmChangeChild

End sub

由于某种原因，它将初始化frmG，它的工作方式与我想要的完全相同，但是当程序继续set frmW = frmChangeChild ，出现以下错误：

Object variable or With block variable not set

我该如何解决？

编辑：

当我键入frmAddChild.show ，它可以很好地工作。 当我输入frmChangeChild.show ，我得到相同的对象/有块错误。

编辑2：

程序运行代码Set frmG = frmAddChild和Set frmG = frmChangeChild ，它似乎试图运行userform_initialize子程序。

如何确保程序不会运行此程序？