Dim intX As Double
intX = cmbboxSTEPS.Value
Dim i As Integer
For i = 1 To 8
If i <> intX Then
swModel.Extension.SelectByID2 CStr(i) + " step", "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0
Thanks Michael, I'm not sure what this is doing.I certainly appreciate any help. I have just started learning VB. I took a solidworks API class but nothing like this was taught. I ordered a book and I'm hoping it will be here today.
I am trying to get this to delete the numbers that Isn't selected in the box. For instance, I my stepcombbox value is 3, then it loops through and deletes the features called 1,2,4,5,6,7&8. leaving the feature 3. when I pasted this into my code its coming up with an error saying "compile error For without Next"
Sorry, Forgot the Next i portion of the code. Worked great!!