---

Hi,
ich arbeite mit Catia V5 R19 SP6 und möchte aus MS Excel 2007/(2010) x-und y-Koordinaten ins Catia mittels eines Makros laden.
Alle bereits angebotenen Lösungen helfen mir nicht weiter, wie z.B.:

-C:\Programme\Dassault Systemes\B19\intel_a\code\command\GSD_PointSplineLoftFromExcel
    --> zeigt die Fehlermeldung "Objekt unterstützt diese Eigenschaft oder Methodik nicht"
- oder von dessault systems die "Point.zip"
    --> zeigt die Fehlermdeldung "Index außerhalb des gültigen Bereiches"!

Wer kann mir hier bei meinem kleinen Problem helfen?

------------------
Gruß K-Jay

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

---

Servus
hast du dir auch mal die Redme.txt durchgelesen. Hast du ein Part geöffnet? (beim dem Makro von catia.cad.de)

Gruß
Bernd

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

[Diese Nachricht wurde von bgrittmann am 23. Jan. 2012 editiert.]

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

---

Ja hab ich. Die Seite von diesem Link catia.cad.de gibt auch nur an, dass das Makro nur unter R16, 17 und 18 funktioniert!
Irgendwas muss ja anders sein bei R19, ich weis nur nicht was. Vielleicht ist es ja nur eine kleinigkeit die am Quellcode geändert werden muss?!

------------------
Gruß K-Jay

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

---

Servus
Versuch mal das Makro schrittweise (aus dem VBA-Editor heraus) auszuführen, um Festzustellen wo das Makro aussteigt. (hab kein Excel 2007)

Gruß
Bernd

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

[Diese Nachricht wurde von bgrittmann am 23. Jan. 2012 editiert.]

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

---

Hab im Excel-Dokument die Makros aktiviert und anschließend den Makronamen "Feuil1.CreationPoint" selektiert und auf "Schritt" geklickt. "Sub CreationPoint()" (unten fett unterlegt) erscheint dann gelb unterlegt und das ist ja die erste Zeile von "Creates all usable points from the parameter file"!
Das sieht so aus:

'------------------------------------------------------------------------
' Creates all usable points from the parameter file
'------------------------------------------------------------------------
Sub CreationPoint()

    'Get CATIA
    Dim PtDoc As Object
    Set PtDoc = GetCATIAPartDocument
   
    ' Get the HybridBody
    Dim myHBody As Object
    Set myHBody = PtDoc.Part.HybridBodies.Item("GeometryFromExcel")
   
    Dim iLigne As Integer
    Dim iValid As Integer
    Dim X As Double
    Dim Y As Double
    Dim Z As Double
    Dim Point As Object
   
    iLigne = 1
    'Analyze file
    While iValid <> Cst_iEND
        'Read a line
        ChainAnalysis iLigne, X, Y, Z, iValid
        iLigne = iLigne + 1
       
        'Not on a startcurve or endcurve -> valid point
        If (iValid = 0) Then
            Set Point = PtDoc.Part.HybridShapeFactory.AddNewPointCoord(X, Y, Z)
            myHBody.AppendHybridShape Point
        End If
    Wend
   
    'Model update
    PtDoc.Part.Update
End Sub

Was kann ich hier machen?

------------------
Gruß K-Jay

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

---

Servus
Du kannst mit F8 jede Zeile einzeln ausführen, und dann erkennen wo das Makro aussteigt. Somit kann man analysieren, wo der Fehler liegt.

Gruß
Bernd

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

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

---

Hallo,

willst du wirklich nur X/Y-Koordinaten in CATIA übertragen? Dann benötigst du auf jeden Fall noch eine Ebene/Fläche um die Z-Koordinaten der Punkte festzulegen. Oder willst du X7Y7Z-Koordinaten einlesen?

------------------
MFG Daniel

Systeminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)

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

---

Ja, nur x- und y-Koordinaten die in einer ebene sind! Das Makro was ich zu bearbeiten versuch ist die "Point.zip" (catia.cad.de) von Dessault systems.

------------------
Gruß K-Jay

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

---

Nach der Zeile:

"Set myHBody = PtDoc.Part.HybridBodies.Item(1)" (vom Text weiter oben)

kommt die Fehlermeldung: "Index außerhalb des gültigen Bereiches!"
Lösungvorschläge?

------------------
Gruß K-Jay

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

---

Servus
Erstelle dir ein Geometrisches Set im Part, dann sollte das Script weiterlaufen (bis zum nächsten Problem?.

Gruß
Bernd

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

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

---

Ja, jetzt funktionierts endlich!
Vielen Dank Bernd 

------------------
Gruß K-Jay

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