Rename a Block Name with the API

Hi, 

I insert over VBA-Code blocks in my drawing. 

After that a worker change the position of the blocks manually.

Now I have to read the positions of the blocks, but there a some duplicated block with the same name. 


My idea is to change the names of the blocks to get unique Names.

Does someone know how to change the Name of a Blockdefinition?
I tested it with the "Rename" function of a Blackdefinition.

Maybe someone has a Solution for me. 

Thanks