topic Re: How to place text into block attribute using vba? in VBA Forum

How to place text into block attribute using vba?

robert.kulas — Fri, 18 Nov 2022 06:42:32 GMT

Hi,

how can I insert text into AutoCAD block attribute using VBA? I have the list of items in Excel with coordinates.

The macro is in Excel.

The blocks are placed but without text inside. I would appreciate for support. RK

Re: How to place text into block attribute using vba?

MakCADD — Tue, 22 Nov 2022 05:57:34 GMT

easiest way is to export attribute values to csv file (attout) and open in excel and replace the data with new value and import (attin) file again in the drawing

vba

attribute=block.getattributes

attribute(index).textstring=newvalue

Re: How to place text into block attribute using vba?

robert.kulas — Wed, 23 Nov 2022 07:58:55 GMT

Thank you MakCADD for the answer.

It should be done by VBA (part of solution) why I try to implement nothing changed. The attribute inside block (item name) stay empty.

Could you send me any example?

Re: How to place text into block attribute using vba?

Ed__Jobe — Wed, 23 Nov 2022 15:42:22 GMT

It would help if you showed the code you have so far. You also need to know the tag name of the attribute you want to change if there's more than one attribute in the block reference.

Re: How to place text into block attribute using vba?

MakCADD — Tue, 29 Nov 2022 16:28:49 GMT

For each object in thisdrawing.layouts(layout.name).block If typeof object is acadblockreference then Set blockref=object If blockref.name= "ABCD" then Attr=blockref.getattributes For I=0 to ubound(attr) If attr(I).tagstring="aaaa" then attr(I).textstring="zzzz" Next I End if End if Next object

Moderator edit: Put code into code window using </> button.

Re: How to place text into block attribute using vba?

robert.kulas — Fri, 25 Nov 2022 11:02:07 GMT

Thank you very much for help. The issue was solved.