Hello,
Thank you for your quick answer!
I know this macro with excel it's great but the problem is i have some 300 3D Points in a txt file like the file atachment.
For creating a Geometrical Set isn't a problem but i don't know how to read the txt file and then put this coordinate in a 3D Point.
-------------------------------
Sub CATMain()
Dim part1 As Part
Set part1 = partDocument1.Part
Dim hybridBodies1 As HybridBodies
Set hybridBodies1 = part1.HybridBodies
'Asks for Name of the Geometrical Set
GSname = inputBox ("Name of the Geometrical Set of the points")
'Create the Geometrical Set of the points
Dim hybridBody1 As HybridBody
Set hybridBody1 = hybridBodies1.Add()
hybridBody1.Name = GSname
Dim hybridShapeFactory1 As HybridShapeFactory
Set hybridShapeFactory1 = part1.HybridShapeFactory
Dim filename As String
filename = CATIA.FileSelectionBox("Select the Excel file of the points", "*.txt", CatFileSelectionModeOpen)
-------
It is the rest i don't know.
Can you help me please.
Thank in advance.
Fenua73.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP