【问题标题】:Catia V5 CATScript to Remove Symbols From Part Body NamesCatia V5 CATScript 从零件主体名称中删除符号
【发布时间】:2016-01-30 21:22:11
【问题描述】:

我一直在寻找一个可以让我删除“。”的宏。和 Catia v5 Part Body 名称中的“/”。

有人见过这样的宏吗?

我有一个读入 Catia 的部分,其中包含多个带有这些符号的 Part Body。 我想运行这个宏,这样我就可以运行一个我已经拥有的宏,它从每个零件主体创建单独的零件并将它们组装成一个产品。创建单独部分的宏失败,因为“。”和“/”不允许在部件名称中。

【问题讨论】:

    标签: catia


    【解决方案1】:

    您的宏可能是这样的,它循环遍历零件中的所有主体并使用replace 函数连续重命名它们:

    Sub FixPartBodyNames()
    
    Dim myPart As Part
    Set myPart = CATIA.ActiveDocument.Part
    
    Dim myBody As Body
    
    Dim newName As String
    Dim newCharacter As String
    newCharacter = " "
    
    For Each myBody In myPart.Bodies 'loop through all the bodies in the part
        newName = myBody.Name 'get the current body's name
        newName = Replace(newName, ".", newCharacter) 'replace all "." with " "
        newName = Replace(newName, "/", newCharacter) 'replace all "/" with " "
        myBody.Name = newName 'rename the current body with the revised name
    Next
    
    MsgBox "All Done!"
    End Sub
    

    【讨论】:

    • 这太好了,感谢您的帮助。你能帮我把它转换成 CATScript 或 CATVBS 吗?
    • @J.Zecha 您如何在 CATScript 中使用它?您是否要运行批处理?或者,您可以向此脚本添加一些代码以循环浏览文件夹和子文件夹中的所有文件。这就是你想要的吗?
    • 我在 Catia V5 的宏菜单中使用它。这个 VBA 代码可以完成我需要的一切。我在一个目录中有一堆其他 CATScript,我想将此宏保留在该目录中。但是,Catia 读取宏的方式,您必须在 VBA 和脚本之间更改目录。我希望这能回答你所有的问题。
    猜你喜欢
    • 1970-01-01
    • 2022-09-29
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2012-02-05
    • 2019-07-18
    • 1970-01-01
    相关资源
    最近更新 更多