unifying mtext font

I have a lot of mtexts, each created with more than one font. I need to convert them so they all have the same new font. Matchprop can’t do the trick. Assigning a new style (chm) through ‘entmod’

(setq e1 (entget n))

(entmod (subst

(cons 7 "chm")

(assoc 7 e1)

e1

)

)

changes only a portion of the text font (see the drawing).

Any idea of how to do this, other than manually, in ddedit (mtedit) dialog box?

Thanks.

mtext.dwg

You may need to first strip the MTEXT Formatting before the changing the Text Style

What trick is there to strip formatting, other than manually? I have a lot of these mtexts.

There are a few routines around, just google Strip Mtext,

Here for example:

http://cadabyss.wordpress.com/

You know what?... I tried to fix a mtext with 2 different styles but this lisp didn´t fixed it... I am sorry but doesn´t work for it... but there must be other lisp to do it... just need to find them, I guess.

There are a few routines around, just google Strip Mtext,

 

Here for example:

http://cadabyss.wordpress.com/

I use one lisp called ddchtext... It will do that and a lot more things... take a look at it... I renamed to DT... just to make it easier to load and use...

First select a bunch of object... then type DT.. (supposing you already loaded it) and filter your options.. and finish pressing select.

dt.zip