0 Replies Latest reply on Feb 3, 2014 6:54 PM by Yong Ning

    How to traverse delete  Configuration?

    Yong Ning

      a0.jpg

       

       

      a1.jpg

      Now select single delete.

      .DeleteConfiguration "c"

       

      code is

       

      Sub lll()

        Dim SwModel As ModelDoc2

        Set SwModel = Application.SldWorks.ActiveDoc

        Debug.Print SwModel.GetTitle

        With SwModel

          .ShowConfiguration "b"

          .DeleteConfiguration "c"

        End With

      End Sub

       

      help traverse delete Configuration

       

      .DeleteConfiguration "a"

      .DeleteConfiguration "b"

      .DeleteConfiguration "c"