如果我拥有管理员权限，以下代码运行良好。但它对用户来说根本不起作用。 Sub CATMain()
On Error Resume Next
Dim strpath As String
strpath = CATIA.FileSelectionBox("Select file", "*.xlsx",
CatFileSelectionModeOpen)
End Sub
我认为CATI
我需要使用VBA测量2个产品之间距离的代码。我不想用团体来衡量。我想在代码中使用distance.firstproduct和distance.secondproduct，而不是使用distance.firstgroup。有人可以帮我处理代码吗？ 谢谢 sub main()
Dim MyDoc As Document
Set MyDoc = CATIA.ActiveDocument
Dim
我需要您的帮助才能正确使用CATIA。 我目前的任务是为模具创建一个“支撑”部分，其中必须插入螺丝帽（不管其长度）最大为15mm。插入的螺钉长度取决于位于支撑部分上方的板。在Excel中，我已经创建了几个公式来确定哪些螺丝钉必须被使用，但我不知道如何在VBA中使用Excel公式。有什么办法在VBA中使用Excel公式甚至电子表格？ 'declaration of X as "Height of P
我试图让用户选择的线路长度/花键 这是我使用的是让用户选择他们的线路代码： Dim USel As Selection
Dim USelLB
Dim InputObject(0)
InputObject(0) = "AnyObject"
Set USel = CATIA.ActiveDocument.Selection
Set USelLB = USel
USel.Clear
U
我开发了一段CATVBA代码来重命名和协调几何集合下的点。这里的问题是，我可以重新命名点，但协调不起作用。我能够在几何设置下获得每个点的坐标值，但设置协调不起作用。请检查并告诉我们是否有任何解决方案。 P.S： - 我想做同一点的坐标，不想用坐标值创建任何新的点。谢谢。 Sub CATMain()
Dim MyObj As Object, pd1 As PartDocument, a As S