Command: Find (Find Carriage Returns, Replace with Space) > mtext

[townest]

I have tried to find the carriage returns in mtext to no avail.  I've tried the usual suspects \\P, \\p, \\n, \U+00D.  I'm wondering if it's even possible.  Tyler

[dlanorh]

Try this lisp

(vl-load-com)
;; Remove Returns
(defun c:rr ( / c_doc ss)
  (prompt "\nSelect MText entities to strip c/r : ")
  (setq c_doc (vla-get-activedocument (vlax-get-acad-object))
        ss (ssget "_:L" '((0 . "MTEXT")))
  );end_setq
  (cond (ss  
          (vlax-for obj (vla-get-activeselectionset c_doc)
            (while (wcmatch (vla-get-textstring obj) "*\\P*")
              (vla-put-textstring obj (vl-string-subst " " "\\P" (vla-get-textstring obj)))
            );end_while
          );end_for
        )
        (  (alert "Nothing Selected"))  
  );end_cond
  (princ)
);end_defun

[natasha.l]

Hello @townest, 

Welcome back.

Try a different command for carriage returns:

Enter     \U+000A

Return   \U+0000

Please "Accept Solution" if a reply or replies have helped resolve the issue or answered your question, to help others in the community.