Leaderboard

The above should do the same - I use it all the time, mostly PDF mark ups, copy to clip board then a LISP txtCBTT (txt, Clip Board To Text) or txtCBNew to paste with no formatting into the drawing - I got annoyed with copy-paste to notepad being soooo slow

In the old times I used to paste the text in Notepad, from there copy-paste in AutoCAD Mtext. All formatting was lost.

This is the basics, copy to clipboard, copy from clipboard ;;Copy text to clipboard ;; (vlax-invoke (vlax-get (vlax-get (vlax-create-object "htmlfile") 'ParentWindow) 'ClipBoardData) 'setData "TEXT" --MYTEXTSTRING-- ) ;;(vlax-release-object html) ;;and release the object ;;Get text from clipboard ;;(vlax-invoke (vlax-get (vlax-get (vlax-create-object "htmlfile") 'ParentWindow) 'ClipBoardData) 'getData "TEXT" ) ;;(vlax-release-object html) and put together in a LISP, set clip board text and get clip board text (defun SetClipBoardText ( MyText / htmlfile result ) (vlax-invoke (vlax-get (vlax-get (setq htmlfile (vlax-create-object "htmlfile")) 'ParentWindow) 'ClipBoardData) 'setData "Text" Mytext) (vlax-release-object htmlfile) (princ) ) (defun GetClipBoardText ( / htmlfile result ) (setq result (vlax-invoke (vlax-get (vlax-get (setq htmlfile (vlax-create-object "htmlfile")) 'ParentWindow) 'ClipBoardData) 'getData "Text")) (vlax-release-object htmlfile) result )

Is this not the same way of writing this that I posted in my first post? (setq ss (ssget "_:L" '((-4 . "<NOT") (210 0.0 0.0 1.0) (-4 . "NOT>"))))