Convert Text Align LSP To Attributes Align

aridzv

Hi.
I found A lsp from lee mac that align text (see attached lsp file).
is it possible to convert this lsp so it will align attributes?
thanks,
Ari.

cadmaster

https://autocadtips1.com/2011/10/03/autolisp-align-attributes/
https://blogs.rand.com/manufacturing/2016/11/aligning-attributes-in-autocad-electrical.html

aridzv

@cadmaster
Thanks for the reply.
I've found These links already, and this LSP don't work for attributes in DWG file (only works for attributes of blocks that are already inserted in to a drawing) .
regards,
Ari.

*Update:
1. the "Align Attribute utility.lsp" is working well, But it is for attributes of a block already inserted in to a drawing (not what i was looking for...)
2. I changed the "AlignTextV1-4.lsp" to align attributes in the block DWG file by changing the Line (if (setq sel (ssget "_:L" '((0 . "TEXT")))) to (if (setq sel (ssget "_:L" '((0 . "attdef")))) and now it is working for attributes in a DWG file.