---

Hallo!

Ich habe noch nie ein Makro vür Catia V5 geschrieben, aber ich bin mir ziemlich sicher das man eines erstellen kann, das Längen, oder Messungen in eine Excel-Tabelle schreibt.

Es sind eigentlich immer die gleichen Messungen, d.h. man könnte sie im Mokro schon definieren, und einfach jedesmal wenn man etwas ändert neu ausgeben.

Hoffe das mir jemand dabei helfen kann.

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

---

simple_part_for_macro.zip

Hallo

Ich habe mal für ein simples Beispiel ein ebenfalls einfaches Makro geschrieben.

Sub Catmain()
'Excel Datei erzeugen
            Dim Excel As Object
           
                ' Versuchen ein evtl. bereits geöffnetes Excel zu aktivieren
                ' Sollte kein Excel geöffnet sein erzeugt dieser befehl einen Fehler
                ' deshalb mit On Error Resume Next im falle eines Fehlers mit dem nächsten Befehl fortfahren
                On Error Resume Next
                Set Excel = GetObject(, "Excel.Application")
             
                ' Wenn der vorhergehene Befehl einen Fehler erzeugt hat (err.Number <> 0) Excel starten
                If Err.Number <> 0 Then
                    Set Excel = CreateObject("Excel.Application")
                    Excel.Visible = True            'Excel im Hintergrund
                End If
               
                          Excel.Workbooks.Add
           
            Set Tabelle1 = Excel.ActiveWorkbook.Sheets(1)
           

           
Set Document = CATIA.ActiveDocument

Set Part = Document.Part

Set bodies1 = Part.Bodies

Set body1 = bodies1.Item("PartBody")

Set shapes1 = body1.Shapes

Rem Stärke der Lamelle auslesen

        Set pad1 = shapes1.Item("Pad.1")

        Set limit1 = pad1.FirstLimit

        Set length1 = limit1.Dimension
       
        Tabelle1.cells(1, 1).Value = length1.Value
       
   
End Sub

Hier wird zunächst Excel aufgerufen und anschließend die Höhe des Blocks in die erste Zelle geschrieben.

Für den Einstieg in die Programmierung hier einige Tips:

Die Onlinehilfe für die Programmierung heißt "V5Automation.chm" unter befindet sich irgendwo unter C:\Programme\Dassault. Weiterhin ist es oft nützlich sich über den Makrorecorder Programme aufzuzeichnen und anschließend zu analysieren.

Schau mal ob du dir das Buch "Catia V5 -Effiziente Konstruktion mit Makros" von Dieter Ziethen besorgen oder zunächst ausleihen kannst.

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

---

Längen.JPG

Hallo!

Ich möchte gern einige gemessene Längen ausgeben. Leider ist bei uns keine Hilfe installiert, daher bitte ich um ein Makro.

Ich will die Längen in eine definierte Excel Datei ausgeben die immer wieder überschrieben wird wenn ich einen Update mache.

Hoffe nochmals um Hilfe.

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

---

Hallo ALJ21
Ich befürchte was du suchst wirst du hier nicht finden!
Wenn Du Detailfragen zu einem deiner Programme hast, kann dir im Forum sicherlich geholfen werden, aber ganze Programme wird  wohl keiner für dich schreiben. Mein Vorschlag:
Arbeite dich in die Programmierung von Makros ein, fang an ein Programm zu schreiben , und wenn du Hilfe brauchst wirst du sie hier finden.
mkna hat dir schon einen klasse Ansatz geliefert.

------------------
Grüße TStone
   "Respektiere die Macht der Worte, wähle sie mit Bedacht!"

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