Autor
|
Thema: PartNumber ersetzen (1131 mal gelesen)
|
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 30. Aug. 2013 11:06 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich hab hier mal ein Macro gefunden mit dem ich die PartNumber in den Properties suchen und dann ersetzen kann. Soweit so gut, leider funktioniert das nur bei Parts. Kann man dieses Macro auch auf die Products erweitern? Schon mal Danke Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 30. Aug. 2013 11:09 <-- editieren / zitieren --> Unities abgeben: Nur für deyhawaii
|
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 30. Aug. 2013 11:11 <-- editieren / zitieren --> Unities abgeben:
Ach richtig, sorry, wollte das ja mit reinstellen. Wie blöde von mir! Hier ist das jetzige Macro: Sub CATMain() String5 = InputBox("Eingeben welcher Name oder Nummer ersetzt werden soll!!! ", "Test") String3 = InputBox("Zu ersetzenden Namen oder Nummer eingeben", "Test") Set productDocument1 = CATIA.ActiveDocument Set selection1 = productDocument1.Selection selection1.Search "(CATAsmSearch.Part),all" For i = 1 To selection1.Count Set productDocument1 = CATIA.ActiveDocument Set product1 = productDocument1.Product Set products1 = product1.Products Set product2 = selection1.Item(i).Value String2 = product2.PartNumber String4 = product2.Name Dim Text1, Text2, Text3, Vergleich, Text4 Text1 = String2 Text2 = String5 Text3 = String3 Text4 = String4 Vergleich = Replace(Text1, Text2, Text3) product2.PartNumber = Vergleich Vergleich2 = Replace(Text4, Text2, Text3) product2.Name = Vergleich2 Next End Sub Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 30. Aug. 2013 12:36 <-- editieren / zitieren --> Unities abgeben: Nur für deyhawaii
|
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 28. Feb. 2014 10:40 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, noch eine Frage zu em Macro. Kann man es auch so erweitern, dass die PartNumber von Parts und Products mit dem gleichen Macro geändert werden. So dass ich nur ein Macro starten muss?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 28. Feb. 2014 16:38 <-- editieren / zitieren --> Unities abgeben: Nur für deyhawaii
Servus Probiere es mal mit dem Suchstring: Code: selection1.Search "(CATAsmSearch.Product + CATAsmSearch.Part),all"
Gruß Bernd PS: So einen Suchstring kann man gute mit der Suche und dem Makrorekorder ermitteln. ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 01. Mrz. 2014 08:57 <-- editieren / zitieren --> Unities abgeben:
|
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 01. Mrz. 2014 11:12 <-- editieren / zitieren --> Unities abgeben:
Also das Macro funzt super. Nur manchmal bricht es ab und meckert folgende Zeile an: product2.PartNumber = Vergleich Mittlerweile hab ich rausgefunden woran es liegt. Wir haben in einigen BG eine bestimmte Art von Unter-BG verbaut. Ist diese Unter-BG in einer BG drin bricht das Macro ab. Deaktiviere ich sie funzt alles. Generell haben wir kein Problem mit Unter-BG. Nur mit dieser speziellen. Hat jemand eine Ahnung woran das liegen könnte? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 11780 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 01. Mrz. 2014 11:34 <-- editieren / zitieren --> Unities abgeben: Nur für deyhawaii
Servus Diese "speziellen Unterbaugruppen" sind Komponente (Components). Schau her mal im Forum wie man diese von "normalen Baugruppen" unterscheidet. Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
deyhawaii Mitglied Konstrukteur
Beiträge: 236 Registriert: 17.09.2005 Catia V5 R26 Siemens NX11 Fides 10
|
erstellt am: 01. Mrz. 2014 11:40 <-- editieren / zitieren --> Unities abgeben:
Ne, es ist ein richtiges Product. Componenten haben wir teilweise auch verbaut. Diese machen aber keine Probleme. Ich schätze entweder das Product dieser Unter-BG oder eins der Parts stört das Macro. Nur was könnte da stören? Vielleicht muss ich mal prüfen an welchem Teil es liegt und dann weiterschauen. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |