以下代码是autodesk公司的inventor软件的一端宏代码用于遍历所有零件并将其可见性设置为可见并且忽略代码运行中的报错请帮忙改进一下代码使代码运行完成后弹出消息框消息内容为错误数量Sub visableAll Dim doc As AssemblyDocument Set doc = ThisApplicationActiveDocument Dim comp A
Sub visableAll() Dim doc As AssemblyDocument Set doc = ThisApplication.ActiveDocument
Dim comp As ComponentOccurrence
Dim errorCount As Integer ' 用于记录错误数量
errorCount = 0 ' 初始化