×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

Exporting points from one face at a time?

Exporting points from one face at a time?

Exporting points from one face at a time?

(OP)
Is it possible to export points from one face, edge, vertex at a time? When I go to export a list of points it always chooses the full part body

RE: Exporting points from one face at a time?

(OP)
Is it possible to create multiple geometric sets? If this was possible I could seperate the faces, edges and vertexs into different sets and this problem would be solved

RE: Exporting points from one face at a time?

You can create multiple geometrical sets with a macro.

Regards
Fernando
 

RE: Exporting points from one face at a time?

(OP)
Would you be able to tell me how I would go about creating this macro?

How do I assign geometric sets to individual faces, edges, vertices?

RE: Exporting points from one face at a time?

Paste the code bellow in a CATScript and run the CATScript in an active CATPart (not inside a CATProduct).

Sub CATMain()

Dim partDocument1 As PartDocument
Set partDocument1 = CATIA.ActiveDocument

Dim part1 As Part
Set part1 = partDocument1.Part

Dim hybridBodies1 As HybridBodies
Set hybridBodies1 = part1.HybridBodies
Dim hybridBody1 As HybridBody
Set hybridBody1 = hybridBodies1.Add()
hybridBody1.Name = "Faces"

Dim hybridBodies2 As HybridBodies
Set hybridBodies2 = part1.HybridBodies
Dim hybridBody2 As HybridBody
Set hybridBody2 = hybridBodies2.Add()
hybridBody2.Name = "Edges"

Dim hybridBodies3 As HybridBodies
Set hybridBodies3 = part1.HybridBodies
Dim hybridBody3 As HybridBody
Set hybridBody3 = hybridBodies3.Add()
hybridBody3.Name = "Vertices"

part1.Update

End Sub

This macro is creating only new Geometrical Sets, what you want is a little bit more elaborated. Basically it can be done using selection method.

For the time being I'm in my summer vacation, so I cannot help you anymore.

Regards
Fernando
 

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!


Resources