Oversized Attributes on Blocks from insertion in 1:40 Annotation, trying to reduce

Hi Everyone,

So a file sent to us was created in AutoCAD Map 2007 and we run AutoCAD MEP 2012 (and some on 2011). A Device ID Block was inserted in the Map program at 1:40 Annotative scale and was fine in their software, but when we load the files the attributes are enlarged to 40x their intended size. There are over 1,000 of these block in the plans and I've run out of solutions. I tried overwriting the block and it failed, and I also tried copying the oversized blocks into a file with the block predefined and that failed as well. At this point I am convinced I need to find or write a lisp for the repeated actions. I am crunching on the process for writing the lisp as I have written macros and VBA Functions for excel and understand the basic principles. But any help would greatly be appreciated. Even any quick links to a pdf sum of lessons or a note on how to record actions in AutoCAD for writing a macro would help greatly. Thanks!!

Also, to clarify the lisp I'm shooting for: I'm trying to 1.) select the block, 2.) copy the value of its (5) Attributes (most are null), 3.) document its insertion coordinates, 4.) delete the current block, 5.) insert a new block at the documented coordinates at the proper scale (which works by simply inserting it as it is), 6.) paste the values of the (5) attributes back in place, 7.) move onto the next block.

Thanks again for any help!