TroutKing Posted November 17, 2008 Share Posted November 17, 2008 Hello, I have another quick question regarding XRefs. I have some code (see abbreviated version below) that I use to attach desired XRefs in bulk for me. (Many thanks to Oleg). It works well, but there is one adjustment I'd like to make. Can someone tell me where/what/how I add to this code so the the XRef "Saved Path" toggle is UNchecked so that the path is not saved? Thank you for any help you can offer. Dim xrfilename As String xrfilename = Inputfolder & "/" & tmpfile Dim blkname As String blkname = tmpfile Dim InsertPoint(0 To 2) As Double Dim insertedBlock As AcadExternalReference InsertPoint(0) = 0: InsertPoint(1) = 0: InsertPoint(2) = 0 Set insertedBlock = ThisDrawing.ModelSpace.AttachExternalReference(xrfilename, blkname, InsertPoint, 1, 1, 1, 0, False) Set insertedBlock = Nothing tmpfile = "" Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.