动态删除和创建具有相同名称的用户表单

Question

嗨，我实际编码删除项目的所有用户表单，并使用XML文件重新创建它们。问题是当我删除用户窗体并且我想用同一个名称重新创建它时，我得到以下错误"Run-time error '75' - Path/File error"。

我用它来删除userforms：

Application.VBE.VBProjects(iMyName).VBComponents.Remove VBComponent:=.Item(x)

其中iMyName是项目名称，x是我循环中的变量。就在我使用之后：

Set ihm_f = .Add(vbext_ct_MSForm)
ihm_f.Properties("Name") = "CA"

其中ihm_f是我的新用户表单，CA是我之前删除的Userform的名称，例如。有人知道怎么办？

Answer 1

尝试在删除和重新创建之间保存工作簿。适合我，但我有兴趣知道一个更好的方法。