Exploding Minsert blocks

[kylei7449]

I've been searching for a routine to explode minserts but haven't found anything yet that works. However, this one did. It's a vlx that I found on another forum (sorry, don't remember which or I'd give the poster/author the credit)

Just copy it to your Support folder and load it ("AP"). Type "explodem" at the command line to run it. It first asks you to select the block; it then asks you if you want to explode? [No/Yes]  Enter No. Yep, enter no. (I know; I tried Yes but it wouldn't work...might be just me though cuz I'm a bit dyslexic; either that or the programmer may be?)

Worked for my situation. Give it a try.

[Ed.Jobe]

If you would like a single one-click command, I wrote something in C# that will do this.

        //  ExplodeMinsert
        /// <summary>
        /// ExplodeMinsert is a command that explodes a <c>MINSERT</c> entity.
        /// </summary>
        [CommandMethod("TID", "ExplodeMinsert", "ExplodeMinsert", CommandFlags.Modal)]
        public void ExplodeMinsert()
        {
            // Ask user For old block name
            PromptEntityOptions PEO = new PromptEntityOptions("Select a MINSERT entity to explode: ");
            PEO.SetRejectMessage("You need to select a minsert: ");
            PEO.AddAllowedClass(typeof(MInsertBlock), true);
            PEO.AllowNone = false;

            PromptEntityResult PER = Active.Editor.GetEntity(PEO);
            try
            {
                using (Transaction trans = Active.Database.TransactionManager.StartTransaction())
                {
                    MInsertBlock oMins = (MInsertBlock)trans.GetObject(PER.ObjectId, OpenMode.ForWrite);
                    oMins.ExplodeToOwnerSpace();
                    oMins.Erase();
                    trans.Commit();
                };

            }
            catch (Autodesk.AutoCAD.Runtime.Exception ex)
            {
                //Throw Exception or ignore if user cancelled command.
                if (ex.ErrorStatus != ErrorStatus.NullObjectId)
                {
                    MessageBox.Show("Error Occured in ExplodeMinsert command. " + ex.Message + ", " + ex.HelpLink, "ExplodeMinsert Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
                };
            }
        }

[mafazjohburg]

its works great .load the file and type explodem then give yes .

[ksreekumar]

Greetings,

Thank you for the .vlx file worked perfectly to me.

[redlink]

Thanks @micromaxturbo1904 .

Your solution works like a charm. I'd vote this as the best solution if I could.

[molivero8NDDT]

Bro, it worked for me so i thank you so much. i really appreciate your help.

[zeromarmota]

1. Copy your minsert block to a blank file.

2. Export the drawing as .wmf (windows metafile)

3. Open a new empty drawing

4. Insert the .wmf file

5. The MINSERT BLOCK now appear as Block reference

6. Explode

7. Some entities may be lost but work with the drawing lines

[ksreekumar]

Wow, this is amazing, thank you for the best idea....

[imriyaskalam]

Select your object then write the command, FLATTEN then enter, then it will ask you remove hidden lines ?

write command : YES. 

its now break but same time it will move automatically from its existing place and it size also will be change.  

[imriyaskalam]

use fllaten command and yes

[imriyaskalam]

flatten command & yes

[imriyaskalam]

Select your object and use FLATTEN command and ender, and and write command yes.

[regowo.transmeka]

Thanks a lot

it really works on my autocad 2012

[ahmad12sl]

it works 100% 

[yaxgaustria]

This solution works, thanks

[ar683707]

This worked great, thank you!