Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Leere Bodies und Geosets löschen

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
  
Die Gewinne der Zukunft werden mit intelligenten, autonomen Elektrofahrzeugen eingefahren. (3DEXPERIENCE)
Autor Thema:  Leere Bodies und Geosets löschen (1559 mal gelesen)
Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 09. Jan. 2018 19:26    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 Leute,
ich bin leider nicht so bewandert in Macroprogramierung. Ich hab da immer weider  das Problem das ich allcatparts erstellen muß und dann lösch ich in der #Egel noch einige elemente wieder raus und den rest speichere ich ab. Leider hab ich dann ständig eine Menge leere Bodies und Geosets im Part. Und dann lösch ich sie händisch immer raus. Das ganze wollt ich gern automatiesert machen. Hab zwar schon versucht mit dem Macrorecorder das mal aufzunehmen aber das funktioniert auch irgendwie nicht.
Hab auch schon verschiedene Codes aus dem Netzt ausprobiert doch leider funktionieren die auch nicht und laufen immer auf Fehler.
Ich hoffe mir kann jemand weiterhelfen oder ein paar hilfreiche Tips geben.

Danke schon mal im vorraus.
Gruß CX

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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 09. Jan. 2018 19: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 Nur für Creator-X 10 Unities + Antwort hilfreich

Servus

Hast du das Makro schon auf catia.cad.de angeschaut?

Gruß
Bernd

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

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 09. Jan. 2018 19: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

Hallo Bernd,

auf der seite war ich schon lange nciht mehr. Aber danke, das Macro funktioniert super.

 

Gruß CX

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 10. Jan. 2018 07:58    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


catiamacrofehler.JPG

 
Hallo Bernd,
also bei der R19 funktioniert das Macro super. Bei der V5-6 2016 bekomme ich ein Fehler.
der Fehler ist in der Zeile wo oSel gedimt wird. "Dim oSel As Selection"
Fehlermeldung lautet:
Compile error:
Can´t find project or library.

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

tberger
Mitglied
Application Manager CATIA V5 / V6


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

Beiträge: 1385
Registriert: 13.01.2007

WIN 7 64bit
V5R21SP3HF49
3DX/V6 R2016x

erstellt am: 10. Jan. 2018 08:21    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 Creator-X 10 Unities + Antwort hilfreich

Versuch mal anstelle As Selection
As Object
zu setzen.

------------------
Grüße aus dem Thurgau
Thomas

+++++++++++++++++++++++++++++++++

CATIA - eine Laune der Natur ...

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 10. Jan. 2018 10:30    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 Thomas,

ja das mit Object funktioniert. Aber dann kommt gleich der nächste Fehler be "Dim oDoc As PartDocument"
und bekomme die Fhelermeldung das das Projekt oder die library nicht gefunden wird.
Mu´ß ich noch irgendwelche libarys zusätzlich anwählen?

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

Sylas
Mitglied



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

Beiträge: 317
Registriert: 19.11.2012

Dell Precision T3500
Intel Xeon W3550 @ 3,07 GHz
12 GB RAM
CATIA V5 R28

erstellt am: 10. Jan. 2018 12:00    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 Creator-X 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von Creator-X:
Hallo Thomas,

ja das mit Object funktioniert. Aber dann kommt gleich der nächste Fehler be "Dim oDoc As PartDocument"
und bekomme die Fhelermeldung das das Projekt oder die library nicht gefunden wird.
Mu´ß ich noch irgendwelche libarys zusätzlich anwählen?


Hallo
Versuch mal an deine Referenzen bei Tools/References... gucken. Untick alles, wo "MISSING" steht.

Sorry für schlecht Deutsch

[Diese Nachricht wurde von Sylas am 10. Jan. 2018 editiert.]

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 15. Jan. 2018 15:32    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,

das hab ich gemacht. Leider hat sich nichts geändert. Kann es sein das da mit den VBA Editor was nicht stimmt?
Falsche
Version oder so?

Gruß Marco

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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 15. Jan. 2018 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 Creator-X 10 Unities + Antwort hilfreich

Servus

Werden überhaupt Bibliotheken von CATIA in den Referenzen angezeigt? Sind die wichtigen Bibliotheken aktiviert (in der Liste)?
Hat VBA bei dir schon mal funktioniert?
Schon mal VBA deinstalliert und wieder installiert?

Gruß
Bernd

PS: ggf hilft auch ein "regserver" (Forensuche)

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

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 15. Jan. 2018 16:22    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 Bernd,

also die Catia Biblioteken werden in den Ref angezeigt und sind alle aktiviert.Daheim funktioniert es ja auch. In der Arbeit da bekomm ich dann Feghler wenn der Code ausgeführt werden soll obwohl es die gleiche Version ist. Vielleicht liegt es ja am Windof10. Daheim hab ich W7 drauf.
Ist schon komisch. Andere Macros laufen ja auch bei mir in der Arbeit.
Bin ein bissel ratlos.

Gruß Marco

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

Sylas
Mitglied



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

Beiträge: 317
Registriert: 19.11.2012

Dell Precision T3500
Intel Xeon W3550 @ 3,07 GHz
12 GB RAM
CATIA V5 R28

erstellt am: 15. Jan. 2018 19:15    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 Creator-X 10 Unities + Antwort hilfreich

Zitat:
Original erstellt von Creator-X:
Hallo Bernd,

also die Catia Biblioteken werden in den Ref angezeigt und sind alle aktiviert.Daheim funktioniert es ja auch. In der Arbeit da bekomm ich dann Feghler wenn der Code ausgeführt werden soll obwohl es die gleiche Version ist. Vielleicht liegt es ja am Windof10. Daheim hab ich W7 drauf.
Ist schon komisch. Andere Macros laufen ja auch bei mir in der Arbeit.
Bin ein bissel ratlos. 

Gruß Marco



Hallo
Hast du deine Makro an andere PC versucht? Startet es?

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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 15. Jan. 2018 19: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 Creator-X 10 Unities + Antwort hilfreich

Servus Marco

In der Firma habt ihr V5-6 2016? Das müsste ja schon VBA 7 sein.
Wie sieht denn unter VBA 7 so ein Code aus (zB löschen eines Bodies per Makrorekorder aufnehmen)?
Nicht dass sich da was bei den Deklarationen verändert hat

Gruß
Bernd

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

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

Creator-X
Mitglied
Konstrukteur


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

Beiträge: 13
Registriert: 27.06.2013

Catia V5 R19
AMD FX6300
16GB
2x FX1700

erstellt am: 15. Jan. 2018 20:58    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, ja macro läuft auf anderen Rechner super. nur nicht in der Arbeit.

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

cimnese
Mitglied
--


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

Beiträge: 43
Registriert: 13.10.2009

Catia V5 SP7 R20

erstellt am: 24. Nov. 2022 14:04    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 Creator-X 10 Unities + Antwort hilfreich

Hallo Gemeinde,
hab hier dieses Makro schon länger in gebrauch, nur funktioniert es nicht mehr wenn ich Hybrid Bodies bei dem Part drinhabe bekomme immer ne Fehlermeldung bei diesem Satz

  For n = oParent.hybridBodies.Count To 1 Step -1

kann mir nicht erklären voran dies liegen kann.
Ohne Hybridbodies funzt es ohne Probleme

Bin leider nicht so fit im ganzen

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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 24. Nov. 2022 14:27    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 Creator-X 10 Unities + Antwort hilfreich

Servus

Vielleicht fehlt da eine Abfrage ob überhaupt eine Hybridbody existiert.
Tausch mal die Funktion DelEmptyGeoSets aus (ungetestet):

Code:
Function DelEmptyGeoSets(oParent As Object) As Integer
  Dim oHB As HybridBody
  Dim n  As Integer
  Dim i  As Integer
 
  oSel.Clear
  'part-hybrid-bodies
  If oParent.hybridBodies.Count <> 0 then
        For n = oParent.hybridBodies.Count To 1 Step -1
            Set oHB = oParent.hybridBodies.Item(n)
            If oHB.hybridBodies.Count > 0 Then DelEmptyGeoSets oHB  'if set in set re-call
            If (oHB.GeometricElements.Count + oHB.HybridSketches.Count + _
                oHB.HybridShapes.Count + oHB.hybridBodies.Count) = 0 Then
                oSel.Add oHB              'if set is empty
                i = i + 1                  'inc. counter
                'Debug.Print oHB.Name
                oSel.Delete                'delete
                oSel.Clear
            End If
        Next
    End If
    DelEmptyGeoSets = i              'return number of deleted hybridbodies
End Function
Gruß
Bernd

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

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

cimnese
Mitglied
--


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

Beiträge: 43
Registriert: 13.10.2009

Catia V5 SP7 R20

erstellt am: 25. Nov. 2022 08: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 Creator-X 10 Unities + Antwort hilfreich


FehlerMakro.jpg

 
Hi Brittmann,
erstmal Dankeschön für Deine Hilfe.
Hab die Funktion ausgetauscht, bekomme jetzt leider die Fehlermeldung.
Häng hier mal das Makro rein.


'---------------------------------------------------------------------------------------
' Module    : modDelEmpty
' Author    : jherzog
' Date      : 23.07.2015
' Purpose  : Delete Empty Bodies and HybridBodies from a CatPart
' Reqs.    : An opened CatPart
'---------------------------------------------------------------------------------------
'
Const strVersion As String = "V1.0"
Const strMacroName As String = "DelEmptyBodies"
Dim oSel As Selection

Sub CATMain()
  Dim oDoc As PartDocument
  Dim oPart As Part
  Dim oBody As Body
  Dim oHB As HybridBody
  Dim n As Integer
  Dim i  As Integer                            'counter for hybridbodies
  Dim j  As Integer                            'counter for bodies
 
  Set oDoc = CATIA.ActiveDocument
  Set oPart = oDoc.Part
  Set oSel = oDoc.Selection
 
  CATIA.RefreshDisplay = False
'---------------------------------------------------------------------------------------
  i = DelEmptyGeoSets(oPart)                  'delete empty 'root' geosets from part

  oSel.Clear
  'Schleife über alle Bodies
  For n = oPart.Bodies.Count To 1 Step -1      'step backwards because of delete
      Set oBody = oPart.Bodies.Item(n)
      i = i + DelEmptyGeoSets(oBody)            'delete empty geosets in body
      If (oBody.Shapes.Count + oBody.hybridBodies.Count + oBody.Sketches.Count = 0) _
        And Not (oBody Is oPart.MainBody) Then 'skip 'PartBody'
        oSel.Add oBody
        j = j + 1                              'inc. counter
'        Debug.Print oBody.Name
        oSel.Delete                            'delete
        oSel.Clear
      End If
  Next
'---------------------------------------------------------------------------------------
  CATIA.RefreshDisplay = True
  oPart.Update
'  DoEvents
  CATIA.StatusBar = "Macro finished."
  MsgBox i & " empty hybridbodies and " & j & " empty bodies found and deleted.", _
      vbOKOnly Or vbInformation, strMacroName & " " & strVersion
End Sub

'---------------------------------------------------------------------------------------
' Procedure : DelEmptyGeoSets
' Author    : jherzog
' Date      : 23.07.2015
' Time      : 15:47
' Languages : VBA 6.5
' V5-Release: V5R19/21
' Purpose  : Delete empty geometric sets from parent
' Parms    : oParent:  Part or Body
' Ret. Value: Number of deleted bodies
'
' Syntax    : DelEmptyGeoSets oBody
'
' Prereqs  : an opened catpart
' Remarks  : checks for sketches, geosets, shapes and geometric elements
'---------------------------------------------------------------------------------------
'Function DelEmptyGeoSets(oParent As Object) As Integer
  Dim oHB As HybridBody
  Dim n  As Integer
  Dim i  As Integer

  oSel.Clear
  'part-hybrid-bodies
  If oParent.hybridBodies.Count <> 0 then
        For n = oParent.hybridBodies.Count To 1 Step -1
            Set oHB = oParent.hybridBodies.Item(n)
            If oHB.hybridBodies.Count > 0 Then DelEmptyGeoSets oHB  'if set in set re-call
            If (oHB.GeometricElements.Count + oHB.HybridSketches.Count + _
                oHB.HybridShapes.Count + oHB.hybridBodies.Count) = 0 Then
                oSel.Add oHB              'if set is empty
                i = i + 1                  'inc. counter
                'Debug.Print oHB.Name
                oSel.Delete                'delete
                oSel.Clear
            End If
        Next
    End If
    DelEmptyGeoSets = i              'return number of deleted hybridbodies
End Function


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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 25. Nov. 2022 09:00    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 Creator-X 10 Unities + Antwort hilfreich

Servus

Die Zeile 'Function DelEmptyGeoSets(oParent As Object) ist auskommentiert (das ' am Anfang entfernen)

Gruß
Bernd

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

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

cimnese
Mitglied
--


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

Beiträge: 43
Registriert: 13.10.2009

Catia V5 SP7 R20

erstellt am: 25. Nov. 2022 10:31    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 Creator-X 10 Unities + Antwort hilfreich


FehlerMakro.jpg

 
Augen auf beim kopieren 
ich hab den `entfernt das Makro läuft jetzt bis zur Zeile 76 und hat dann hier den Fehler

If oParent.hybridBodies.Count <> 0 then

ich kapiers nicht

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: 11750
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 25. Nov. 2022 12:41    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 Creator-X 10 Unities + Antwort hilfreich

Servus

Wie sieht denn dein Strukturbaum aus?
Bei welchem Objekt (das an DelEmptyGeoSets übergeben wird) steigt das Makro aus?

Gruß
Bernd

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

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)2022 CAD.de | Impressum | Datenschutz