I'm trying to write a macro that will explode all of the blocks in a drawing.
I have one that will get all the blocks in the drawing and delete them. It is shown below. From what I've seen in Help, they keep referring to an instance of the block. Do I need to iterate through each instance and explode? If so, anyone know how I get started?
Dim swDoc As SldWorks.ModelDoc2 Dim swFeat As SldWorks.Feature Dim swSketchMgr As SldWorks.SketchManager Dim swSketchBlockDef As SldWorks.SketchBlockDefinition Dim vSketchBlockDefs As Variant Dim vSketchBlockDef As Variant Dim retval As Variant
Set swApp = Application.SldWorks Set swDoc = swApp.ActiveDoc Set swSketchMgr = swDoc.SketchManager