Why Why Why .......

Try this sample from SolidWorks API Support Examples that autodimensions all sketches in a model:

Can you give an example?

The code segment i had tried was :

Sub main() Set swmodel = swApp.ActiveDoc Set swselmgr = swmodel.SelectionManager Set swpart = swmodel Set swsketch = swmodel.GetActiveSketch2 'this is always NOTHING 'addto " sketch count " & swmodel.ge If swsketch Is Nothing Then MsgBox " there isn't active sketch !! " Else MsgBox " Sketch is now present !! " End If loopsch swsketch 'function to loop throught sketchsegments 'loopbodies swpart fmain.Show End Sub

message news:...

I just ran your code in SW2004 SP0. For me if, I am editing a sketch when I invoke the macro, then I do get the message "Sketch is now present". For GetActiveSketch2 not to return NOTHING it is not sufficient for the sketch to be merely selected; it has to be being edited at the time. The API documentation sometimes refers to this as activated.

What are you trying to achieve? Your previous post mentions looping through all the sketches in a part. Did you find the autodimension all sketches sample on the SolidWorks website?