Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Part / Assembly
  Mehrere Body gleichzeitig umbenennen ???

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Mehrere Body gleichzeitig umbenennen ??? (6616 mal gelesen)
as3469_ask
Mitglied
Konstrukteur

Sehen Sie sich das Profil von as3469_ask an!   Senden Sie eine Private Message an as3469_ask  Schreiben Sie einen Gästebucheintrag für as3469_ask

Beiträge: 3
Registriert: 23.01.2006

erstellt am: 08. Mai. 2006 07:28    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo
wie kann man in einem Part mehrere Bodys aufeinmal umbenennen ?
Zum Beispiel mit einer fortlaufenden Nummer.
PartBody01 PartBody02 PartBody03 ...
Danke

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

KYD
Mitglied
Dipl. Ing. Schiffbau


Sehen Sie sich das Profil von KYD an!   Senden Sie eine Private Message an KYD  Schreiben Sie einen Gästebucheintrag für KYD

Beiträge: 629
Registriert: 24.03.2004

Catia V5 r17 (englisch)
Win XP Pro SP2

erstellt am: 08. Mai. 2006 10:50    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

hmm. genau das beispiel, das du gerade genannt hast, macht catia doch:

Body.1
Body.2
Bodu.3
...
etc.

:-)

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

predy
Mitglied
Industriedesigner


Sehen Sie sich das Profil von predy an!   Senden Sie eine Private Message an predy  Schreiben Sie einen Gästebucheintrag für predy

Beiträge: 777
Registriert: 05.07.2003

CATIA V5R16 SP3 64Bit
Windows XP Pro X64 Edition
2x Intel Xeon 3.6GHz 4GB RAM
Nvidia Quadro FX 3450/4000 SDI 256MB

erstellt am: 08. Mai. 2006 11:09    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

@as3469_ask:

in einem CatPart kann es nur ein PartBody geben, aber wahrscheinlich meinst Du ( wie KYD bereits geschrieben hat) Bodys.

gruss


predy

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

as3469_ask
Mitglied
Konstrukteur

Sehen Sie sich das Profil von as3469_ask an!   Senden Sie eine Private Message an as3469_ask  Schreiben Sie einen Gästebucheintrag für as3469_ask

Beiträge: 3
Registriert: 23.01.2006

erstellt am: 08. Mai. 2006 11:44    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Jo meinte Bodys !!!
Das Problem ist das die Namen der Bodys nach jendem Mal rausschreiben mit GenerateCatpartfrom produkt.. immer länger werden und ich sie alle auf einmal umbenennen will. Ähnlich wie bei ner Digicam XXXX01, XXXX02 usw.

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

predy
Mitglied
Industriedesigner


Sehen Sie sich das Profil von predy an!   Senden Sie eine Private Message an predy  Schreiben Sie einen Gästebucheintrag für predy

Beiträge: 777
Registriert: 05.07.2003

CATIA V5R16 SP3 64Bit
Windows XP Pro X64 Edition
2x Intel Xeon 3.6GHz 4GB RAM
Nvidia Quadro FX 3450/4000 SDI 256MB

erstellt am: 08. Mai. 2006 11:55    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich


mehrfach.jpg

 
hmmm...habe soeben die Mehrfachauswahl (mit STRG) ausprobiert.

In "Properties" kann man zwar auf "All"stellen. Jedoch lässt sich der Name nicht ändern. s. Anhang

sorry...hab leider keine Lösung im Moment.

gruss

predy

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

Lusilnie
Mitglied



Sehen Sie sich das Profil von Lusilnie an!   Senden Sie eine Private Message an Lusilnie  Schreiben Sie einen Gästebucheintrag für Lusilnie

Beiträge: 1486
Registriert: 13.07.2005

erstellt am: 08. Mai. 2006 23:05    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich


rename_all_bodies.zip

 
Hallo allerseits,

nach meiner Meinung wäre hier ein kleines Macro angebracht, da "as3469_ask" ja nur die Body-Namen kürzen und in der Art Body.1, Body.2, Body.3,... durchnummerieren will.
Dazu sollte folgender Code reichen(, habe ihn auch angehängt!):

Code:
Language = "VBSCRIPT"

Sub CATMain()

    Dim productDocument1 As PartDocument
    Set productDocument1 = CATIA.ActiveDocument
   
    Dim selection1 As selection
    Set selection1 = productDocument1.selection
   
    selection1.Search "CATPrtSearch.BodyFeature,all"
   
    Dim Imax As Integer
    Imax = selection1.Count
       
    For I = 1 To Imax
        selection1.Item(I).Value.Name = "Body." & CStr(I) & ".temp_rename"
    Next
   
    For I = 1 To Imax
        selection1.Item(I).Value.Name = "Body." & CStr(I)
    Next
   
End Sub



Hinweis: Das Macro muß im einzelnen geöffneten Part ausgeführt werden!


mfg,
Lusilnie

------------------

Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

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

as3469_ask
Mitglied
Konstrukteur

Sehen Sie sich das Profil von as3469_ask an!   Senden Sie eine Private Message an as3469_ask  Schreiben Sie einen Gästebucheintrag für as3469_ask

Beiträge: 3
Registriert: 23.01.2006

erstellt am: 09. Mai. 2006 07:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Lusilnie
klappt Super
besten DANK

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

predy
Mitglied
Industriedesigner


Sehen Sie sich das Profil von predy an!   Senden Sie eine Private Message an predy  Schreiben Sie einen Gästebucheintrag für predy

Beiträge: 777
Registriert: 05.07.2003

CATIA V5R16 SP3 64Bit
Windows XP Pro X64 Edition
2x Intel Xeon 3.6GHz 4GB RAM
Nvidia Quadro FX 3450/4000 SDI 256MB

erstellt am: 09. Mai. 2006 08:33    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

@Lusilnie:

Danke für die Lösung.

Klappt wunderbar...

10Us for U 


gruss

predy

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

Norman Schulz
Mitglied
Konstrukteur Catia V4/V5


Sehen Sie sich das Profil von Norman Schulz an!   Senden Sie eine Private Message an Norman Schulz  Schreiben Sie einen Gästebucheintrag für Norman Schulz

Beiträge: 300
Registriert: 18.03.2002

erstellt am: 27. Okt. 2011 10:09    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Hallo!
Ich wuerde gerne auch Geometrische Sets umbenennen lassen, kenne jedoch die Syntax hierfuer nicht.
Kann mir jemand weiterhelfen?

Gruss Norman

------------------
WTL Engineering GmbH          
n.schulz@wtl-group.de
http://www.wtl-group.de

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

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 27. Okt. 2011 17:02    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Servus
Versuch es mal so:
Code:
Language="VBSCRIPT"

Sub CATMain()

    Dim productDocument1 As PartDocument
    Set productDocument1 = CATIA.ActiveDocument
 
    Dim selection1 As selection
    Set selection1 = productDocument1.selection
 
    selection1.Search "(((CATStFreeStyleSearch.OpenBodyFeature + CATPrtSearch.OpenBodyFeature) + CATGmoSearch.OpenBodyFeature) + CATSpdSearch.OpenBodyFeature),all"
 
    Dim Imax As Integer
    Imax = selection1.Count
     
    For I = 1 To Imax
        selection1.Item(I).Value.Name = "GeoSet." & CStr(I) & ".temp_rename"
    Next
 
    For I = 1 To Imax
        selection1.Item(I).Value.Name = "GeoSet." & CStr(I)
    Next
 
End Sub



Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

Norman Schulz
Mitglied
Konstrukteur Catia V4/V5


Sehen Sie sich das Profil von Norman Schulz an!   Senden Sie eine Private Message an Norman Schulz  Schreiben Sie einen Gästebucheintrag für Norman Schulz

Beiträge: 300
Registriert: 18.03.2002

erstellt am: 28. Okt. 2011 05:53    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Hallo Bernd,

vielen Dank fuer Deine Hilfe!

Funktioniert einwandfrei.

Gruss Norman

??? Kann man eigentlich keine 10 Unities mehr vergeben? Bei mir lassen sich nur noch 9 anwaehlen ???   Naja, 9 heute und den Rest beim naechsten Mal ;-)
=> taraaaa, mann muss nur die Aufloesung kleiner stellen, dann erscheint auch wieder die 10 ;-)

------------------
WTL Engineering GmbH          
n.schulz@wtl-group.de http://www.wtl-group.de

[Diese Nachricht wurde von Norman Schulz am 28. Okt. 2011 editiert.]

[Diese Nachricht wurde von Norman Schulz am 28. Okt. 2011 editiert.]

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

Jonas-SX
Mitglied


Sehen Sie sich das Profil von Jonas-SX an!   Senden Sie eine Private Message an Jonas-SX  Schreiben Sie einen Gästebucheintrag für Jonas-SX

Beiträge: 9
Registriert: 20.01.2020

R19,R21,R26,R27,R28&R29

erstellt am: 17. Feb. 2020 15:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Hallo zusammen,
und zwar bin ich auf der Suche nach einer Möglichkeit schon vorhandene Körper automatisch umzubenennen (Alle in einem Part).
Im Forum habe ich leider nichts genaueres finden können, daher setzte ich hier mal an.
(Dieser Beitrag kommt dem Thema zumindest mal nah)

Ich habe ein Part mit vielen verschiedenen Körper:

48641_000_xxx_00_Kopfplatte
48641_000_xxx_00_Niederhalter
48641_000_xxx_00_Grundplatte
usw.

Nun würde ich gerne mit Hilfe eines Macros diese ändern das am Schluss folgendes steht:

48641_000_xxx_00_Kopfplatte-P1
48641_000_xxx_00_Niederhalter-P1
48641_000_xxx_00_Grundplatte-P1

Evtl. gab oder gibt es das Thema schon oder jemand hat einen Tip für mich?

Jedenfalls im Voraus vielen Dank!

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

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 17. Feb. 2020 17:56    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Servus

Lass eine Schleife über die Bodies laufen und benenne diese um zB:

Code:
for i = 1 to oPart.Bodies.Count
  oPart.Bodies.Item(i).Name = oPart.Bodies.Item(i).Name & "-P"
next
Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

Jonas-SX
Mitglied


Sehen Sie sich das Profil von Jonas-SX an!   Senden Sie eine Private Message an Jonas-SX  Schreiben Sie einen Gästebucheintrag für Jonas-SX

Beiträge: 9
Registriert: 20.01.2020

erstellt am: 18. Feb. 2020 12:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Jetzt hab ich mal was versucht...
(gespeichert als CATScript)

_ _ _ _

Language = "VBSCRIPT"

Sub CATMain()

    Dim productDocument1 As PartDocument
    Set productDocument1 = CATIA.ActiveDocument
   
    Dim selection1 As selection
    Set selection1 = productDocument1.selection
   
    selection1.Search "CATPrtSearch.BodyFeature,all"
   
    Dim Imax As Integer
    Imax = selection1.Count
   
For I = 1 to oPart.Bodies.Count
oPart.Bodies.Item(I).Name = oPart.Bodies.Item(I).Name & "-P"
next
   
   
End Sub

_ _ _ _

Selektion der Bodys geht, allerdings steigt es dann bei  "For I = 1 to oPart.Bodies.Count" aus.

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

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 18. Feb. 2020 12:49    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

Servus

Wie du auf die Bodies zugreifst: siehe dein Code
Oder über die Selektion: diesen Code anpassen (nur erste For-Next-Schleife verwenden und die Zeile mit dem umbenennen anpassen (Code nachvollziehen))

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

Jonas-SX
Mitglied


Sehen Sie sich das Profil von Jonas-SX an!   Senden Sie eine Private Message an Jonas-SX  Schreiben Sie einen Gästebucheintrag für Jonas-SX

Beiträge: 9
Registriert: 20.01.2020

erstellt am: 18. Feb. 2020 16:14    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für as3469_ask 10 Unities + Antwort hilfreich

"(Code nachvollziehen)" bin ich grad am durchackern ;-)
Da alles für mich leider Neuland ist, tuhe ich mir noch etwas schwer damit

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz