See attached a jpeg of the problem of the attached dwg file for testing.
When I use my code below for setting the dim text locations back to default it has no effect.
PS. These dims have no style overrides.
(defun c:Dim_Text_Reset (/ ss)
(if (setq ss (ssget '((0 . "DIMENSION"))))
(progn
(command "_dim1" "HOME" ss "")
(princ (strcat "\nAll selected dimension text has been reset on < " (itoa (sslength ss)) " > object/s"))
)
(princ "\n*** Nothing Selected ***")
)
(setq ss nil)
(princ)
)
Another Q is in there and not so LISP related but if anyone can answer that, that would be great.
CAD FILE:
Dim Forum Q.dwg
IMAGE: