Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Catia VBA Automation :

ballazolo

Automotive
Joined
Aug 10, 2007
Messages
2
Location
RO
Hi,
I'm trying to rotate a part that is already positioned within a product structure (so it's not in 0,0,0 ), but I would like the rotation to occur around the part’s own local axis system, not the global axis.
The issue is that this rotation is applied relative to the global axis system, not the part’s local axis system.
Question:How can I apply a rotation so that the part rotates around its own local axis rather than the global coordinate system?
Any guidance would be greatly appreciated!

Here is the code I'm currently using:

`Set move1 = productToMove.Move
Set move1 = move1.MovableObject
Dim arrayOfVariantOfDouble1(11)

arrayOfVariantOfDouble1(0) = XCoord(0)
arrayOfVariantOfDouble1(1) = XCoord(1)
arrayOfVariantOfDouble1(2) = XCoord(2)

arrayOfVariantOfDouble1(3) = YCoord(0)
arrayOfVariantOfDouble1(4) = YCoord(1)
arrayOfVariantOfDouble1(5) = YCoord(2)

arrayOfVariantOfDouble1(6) = ZCoord(0)
arrayOfVariantOfDouble1(7) = ZCoord(1)
arrayOfVariantOfDouble1(8) = ZCoord(2)

arrayOfVariantOfDouble1(9) = Position(0)
arrayOfVariantOfDouble1(10) = Position(1)
arrayOfVariantOfDouble1(11) = Position(2)

Set move1Variant = move1
move1Variant.Apply arrayOfVariantOfDouble1`
 

Part and Inventory Search

Sponsor

Back
Top