---

Guten morgen liebe Forumsgemeinde,

für projektbezogene Sonderbauteile nutze ich die Baugruppe eines Standardbauteil aus dem PDM. Ich kopieres es in die das jeweilige Projekt ausßerhalb des PDM.
Um jetzt nicht viele kleine Dateien ablegen zu müssen, mache ich dabei alle Teile und Unterbaugruppen virtuell. So bleiben im Projekt nur 2 Daien (Model und Zeichnung).
Das funktioniert recht gut.

Bei virtuell machen werden alle Teile in "Kopie von..." umbenannt. Dadurch leidet die Übersicht stark.

Frage:
Lässt sich das vermeiden?
Falls nicht, gibt es ein Makro, dass automatisch "Kopie von..." aus allen virtuellen Teilen und Unterbaugruppen entfernt.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ich vermute seit 27. Jänner 2022 hat sich nicht viel geändert:
https://ww3.cad.de/foren/ubb/Forum2/HTML/033854.shtml

wenn du oben unter Filter "kopie" (ohne Stricherl) eingibst,
kannst du ähnliche Themen aufspüren

lg Martin

------------------
ich spiel noch immer gern mit Bauklötzen, nur sind sie jetzt teurer 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich hatte nach "Kopie von" gesucht und nichts gefunden.

Kennst jemand ein Markro, dass alle Features durchläuft und umbenennt oder etwas sucht.
Ich tue mich schwer eines völlig neu zu schreiben. Wenn es nur ums anpassen geht, dann schaffe ich das sicher.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ein fertiges Makro hab ich nicht gefunden aber dies kannst du als Basis nehmen:
Macro alle Teile & Unterbraugruppen umbenennen

------------------
21 ist nur die halbe Antwort.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich habe gerade in der API-Hilfe etwas brauchbares gefunden - modifiziert - und in einem ersten Versuch funktioniert es sogar.
Ich werde es mir aber noch genauer ansehen.

Code:

---

'---------------------------------------
' Preconditions: Assembly document is open.
' Postconditions: Assembly component names are changed by
'                appending 123 to the end of the names.
'---------------------------------------
Option Explicit
Public Enum swUserPreferenceToggle_e
    swExtRefUpdateCompNames = 18
End Enum
Sub Main()
    Dim swApp                  As SldWorks.SldWorks
    Dim swModel                As SldWorks.ModelDoc2
    Dim swConfigMgr            As SldWorks.ConfigurationManager
    Dim swConfig                As SldWorks.Configuration
    Dim swRootComp              As SldWorks.Component2
    Dim Children                As Variant
    Dim swChild                As SldWorks.Component2
    Dim ChildCount              As Integer
    Dim OldName                As String
    Dim NewName                As String
    Dim bOldSetting            As Boolean
    Dim bRet                    As Boolean
    Dim i                      As Long

    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set swConfigMgr = swModel.ConfigurationManager
    Set swConfig = swConfigMgr.ActiveConfiguration
    Set swRootComp = swConfig.GetRootComponent
   
    bOldSetting = swApp.GetUserPreferenceToggle(swExtRefUpdateCompNames)
    swApp.SetUserPreferenceToggle swExtRefUpdateCompNames, False
   
    Children = swRootComp.GetChildren
    ChildCount = UBound(Children)

    For i = 0 To ChildCount
        Set swChild = Children(i)
        ' Changing component name requires component to be selected
        bRet = swChild.Select2(False, 0)
        OldName = swChild.Name2
        If Left(OldName, 10) = "Kopie von " Then
            NewName = Mid(OldName, 11, Len(OldName) - 11)
        End If
        Debug.Print "OldName = " + OldName
        Debug.Print "NewName = " + NewName
        Debug.Print ""

        swChild.Name2 = NewName
    Next i
    swApp.SetUserPreferenceToggle swExtRefUpdateCompNames, bOldSetting
End Sub

---

Original stammt von
https://help.solidworks.com/2013/english/api/sldworksapi/Rename_Assembly_Components_Example_VB.htm

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Skalar,

sieht ja vielversprechend aus,
ich habe im alten Thread den Hinweis auf diesen Thread plaziert,
da deine Lösung vielversprechend ist.

lg Martin

------------------
ich spiel noch immer gern mit Bauklötzen, nur sind sie jetzt teurer 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP