Replace block with attributes, VB

[cll]

Help !
Problem: I want to replace a block (OldTitleblock) that have attribute (OldTagValue), with another (NewTitleblock) and transfer the attribute to NewTagValue. The OldTitleblock have Tag which value shall be transfered to another Tag in the NewTitleblock.
I think it should be easy done with a VB code.
Can anyone help?

 

[wlhijlke]

Hi,

I now that it is posible in vba, but there already exist a lisp routine called attredef.lsp that will do the job. This is how it works:

1 - insert (exploded) your newly created block outside the drawing

2 - start with at or attredef and select the attributes you needed

3 - select the new block

that's it ;-)

You also can use blockreplace found in the \support\vba directory, but I have no experience with it.

regards.

 

[cll]

Thanks vlhijlke!

Actually I made it by combining some vba-samples and specialize them to my needs. I can update four named old titleblocks to our newest.
I've worked a little with vba, but never got into lisp, thats why I prefer vba.

Regards
Claus