Using VBA to Delete a layer in a complex drawing.

Does anyone have a program that can delete a layer be from a

complex drawing. I think this would take several steps.

First I think a person would have to move the entities

form the layer they are going to delete to a different

layer(Say from E1 to E4). I think they would have to step thru all the

model/paper spaces to make conversions. Is there a way to do this?

I guess the program would have to convert block references also.

Does anyone have a way or sample code of this?

Thank you,

We have done things like this before. You would need to cycle through every object in the blocks collection. The collection would include modelspace and its objects, then onto all blocks. This captures almost all entities. A few other objects to check are invisible ents, empty strings, empty blocks (we delete those first usually).

Is there any information on how to go thru all the spaces, block etc collections?

Thank you,

I guess a purge all would not work?