Topic: Set all text styles and dim styles to be non-annotative

[w64bit]

I want to set all text styles and dimension styles to be non-annotative.
For dimension styles I have a code (IT'S NOT OK because it sets all dimensions on the last dim style):

Code: [Select]

(while (setq tbl (tblnext "style" (not tbl)))
(command "._style" "_ANnotative" "_No" (cdr (assoc '2 tbl)) "_Yes" "" (cdr (assoc '2 tbl))))
If this issue can be fixed I am looking also for something similar for text styles.