guigol Posted December 21, 2016 Share Posted December 21, 2016 Hi, After exported Inventor file to 2D DWG, my dwg file is full of groups (corresponding of each element in inventor) But my client don't want groups. He wants blocks. How can I convert all the groups in blocks in one manipulation? (Or do you know how you export directly from inventor to dwg file with blocks?) Quote Link to comment Share on other sites More sharing options...
BIGAL Posted December 22, 2016 Share Posted December 22, 2016 (edited) This was a very old post have a look for the PB function worked for the simple test I did, only hiccup is it makes $ac2dhetfb block names but you could do some form of rename after paste. Link removed found original - original code by ASMI 2008 (defun c:pb(/ lPt) (and(setq lPt(getvar "LASTPOINT")) (vl-cmdf "_.copybase" lPt (ssget) "") (vl-cmdf "_.pasteblock" lPt) (vl-cmdf "_.erase" "_p" "")) (princ) ); end of c:pb ; rename version ; original code by ASMI rename by Alan H (defun c:pb (/ lPt) (and(setq lPt(getvar "LASTPOINT")) (vl-cmdf "_.copybase" lPt (ssget) "") (vl-cmdf "_.pasteblock" lPt) (setq objname (assoc 2 (cdr(entget (entlast))))) (vl-cmdf "_.erase" "_p" "") (command "-rename" "block" (cdr objname) (getstring "Enter new name")) ) (princ) ); end of c:pb Edited December 22, 2016 by BIGAL 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.