(setq ss (ssget "x" (list '(0 . "insert") '(66 . 1) (cons 2 block-spec) (cons 410 (getvar 'ctab)))))
(repeat (setq i (sslength ss))
(mpx-restrict-attrib-widths
(vlax-ename->vla-object (ssname ss (setq i (1- i))))
tag-spec
max-width
)
)
So to be sure I understand...Code - Auto/Visual Lisp: [Select]You've setq "wid" to 5.25...
then saying "IF" dimscale is greater than 0 multiply "wid" times the current dimscale.