Export objects in a particular order to SVG/DXF/PDF

Lol, that’s just what I was playing with :wink: I just wish there was a more automatic way of doing it for larger numbers of objects.

Dim arrObjects, strObject, n

’ Select objects one at a time in the sequence you’d like them exported in
arrObjects = Rhino.GetObjects

If IsArray(arrObjects) Then
’ Go through each object in reverse order, cut and paste in place
For n=ubound(arrObjects) To 0 Step -1
rhino.copyobject(arrObjects(n))
rhino.DeleteObject(arrobjects(n))
Next
End If

1 Like