How to batch delete text styles

[liyongfamily]

Is there a good way to batch delete multiple text styles from files? At present, there are too many text styles in the file that I want to delete. Is there a similar way to delete a layer and assign it to another layer? Can you delete excess text styles in this way, or similar to other batch deletion methods? thank you.

[maxim_k]

Hi @liyongfamily ,

At first, you can use PURGE command to remove unused text styles from the drawing.

If you want to remove text styles that are in use in the drawing, you need to change Text Style of the existing text objects at first. You can use SELECTSIMILAR or QSELECT command to select all text, mtext or mleader objects outside blocks, then change their text style with Properties palette. After that you can use PURGE command to remove unused text styles.

Another thing is if you have text styles inside blocks. You need to edit each block manually or explode these blocks before using PURGE command.

I believe it is possible to create Lisp routine to automate this. It may be possible to find something on the Internet, but keep in mind that most routines contain Visual Lisp code which is not supported on Mac.