用VBA编程发现运行程序提示【运行中错误“424”，要求对象】

Question

用VBA编程发现运行程序提示【运行中错误“424”，要求对象】，哪个地方出错了呢？

用户窗体如下：

代码：

Private Sub 新零件_Click()
Dim swApp As SldWorks.SldWorks
  Set swApp = Application.SldWorks
  Dim swModel As SldWorks.ModelDoc2
Set swModel = swApp.NewDocument("D:\UT规范\UT模板\模板\UT模型模板\零件.prtdot", 0, 0#, 0#)
  Dim swPart As SldWorks.PartDoc
  Set swPart = swModel
  swModel.SketchManager.InsertSketch True
  swModel.SketchManager.CreateCornerRectangle 0, 0, 0, 0.1, 0.1, 0
  swModel.FeatureManager.FeatureExtrusion2 True, False, False, 0, 0, 0.1, 0.01, False, False, False, False, 0.01745329251994, 0.01745329251994, False, False, False, False, 1, 1, 1, 0, 0, False
    
    If chkRollback.Value = True Then
  swPart.EditRollback '特征回退
End If
End Sub

Answer 1

提示报错，点击帮助，出现一个报错文档说明，我点击调试后，会自动跳转到对应报错行，发现回退框命名与代码输入的对不上

我只需要把把chkRollback换成回退就不会报错了