Advanced Meshing Tools with CATVBA
Advanced Meshing Tools with CATVBA
(OP)
Hello everybody,
beforehand, I apologize for my English.
It's my first time here. My name is Akram and I am a mechanical engineer in aeronautic.
I usely work with VBA & CATVBA to automate part design (Parts & Products).
But this time I have to work on Analysis.
the operation is quite easy. I just have to execute a circular repetition on a part surface (already meshed).
But when I tried to record the operation on CATIA, it's give my nothig uhelpful:
"Dim specsAndGeomWindow1 As SpecsAndGeomWindowk
Set specsAndGeomWindow1 = CATIA.ActiveWindow
Dim viewer3D1 As Viewer3D
Set viewer3D1 = specsAndGeomWindow1.ActiveViewer
Dim viewpoint3D1 As Viewpoint3D
Set viewpoint3D1 = viewer3D1.Viewpoint3D”
here is a pic for more information
Before operation
Link
After operation
Link
Thanks
beforehand, I apologize for my English.
It's my first time here. My name is Akram and I am a mechanical engineer in aeronautic.
I usely work with VBA & CATVBA to automate part design (Parts & Products).
But this time I have to work on Analysis.
the operation is quite easy. I just have to execute a circular repetition on a part surface (already meshed).
But when I tried to record the operation on CATIA, it's give my nothig uhelpful:
"Dim specsAndGeomWindow1 As SpecsAndGeomWindowk
Set specsAndGeomWindow1 = CATIA.ActiveWindow
Dim viewer3D1 As Viewer3D
Set viewer3D1 = specsAndGeomWindow1.ActiveViewer
Dim viewpoint3D1 As Viewpoint3D
Set viewpoint3D1 = viewer3D1.Viewpoint3D”
here is a pic for more information
Before operation
Link
After operation
Link
Thanks





RE: Advanced Meshing Tools with CATVBA
I believe you need to work with AddNewCircPattern....an example can be found in v5automation file - Creating a Simplified Camshaft
Regards
Fernando
https://picasaweb.google.com/102257836106335725208
https://picasaweb.google.com/103462806772634246699...