Anuncios

The Autodesk Community Forums has a new look. Read more about what's changed on the Community Announcements board.

Anonymous
en respuesta a: klaus.gibbe

The origin axis as 0,0,0 is something i tried before. The thing that i changed was the exclusive parameter of the Select method to false and that seemed to work. For reference:

Sub Main

	Dim app As Application
	Dim doc As FMDocument

	Set app = Application
	Set doc = app.ActiveDocument

	'made a simple curve within the turning document for rotation around Y axis
	doc.curves.Item(1).Select(True, False)
	doc.curves.Selected.XFormRotate(False, False, 0, 90, eXFT_RotateCenterYAxis, 0,0,0)


End Sub

Thanks for your help!