---

Hallo!

Kann mir jemand einen Tip geben bzw. ein Beispiel nennen, wie man per VB eine Liste aller Konfigurationen der aktuellen Datei enthält?

ciao
Detlef

------------------
--
Detlef Jockheck

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

Beispiel ist aus der API Hilfe.

( hätte man finden können. )

Get List of Configurations Example (VB)
This example shows how to get a list of configuration names for the active document.
'----------------------------------------

Code:

---

Option Explicit

Sub main()

    Dim swApp                  As SldWorks.SldWorks

    Dim swModel                As SldWorks.ModelDoc2

    Dim vConfigName            As Variant

    Dim sConfigName            As String

    Dim swConfig                As SldWorks.configuration

    Dim i                      As Long

    Dim bRet                    As Boolean

   

    Set swApp = CreateObject("SldWorks.Application")

    Set swModel = swApp.ActiveDoc

    Set swConfig = swModel.GetActiveConfiguration

   

    Debug.Print "File = " & swModel.GetPathName

    Debug.Print "  Active Config = " & swConfig.Name

    Debug.Print ""

 

    vConfigName = swModel.GetConfigurationNames

    For i = 0 To UBound(vConfigName)

        sConfigName = vConfigName(i)

       

        Set swConfig = swModel.GetConfigurationByName(sConfigName)

       

        Debug.Print "  ConfigName(" + Str(i) + ") = " + sConfigName

        Debug.Print "    UseAlternateNameInBOM = " + Str(swConfig.UseAlternateNameInBOM)

        Debug.Print "    AlternateName        = " + swConfig.alternateName

        Debug.Print "    Comment              = " + swConfig.comment

        Debug.Print ""

    Next i

End Sub

---

Gruß Oliver

------------------
Software nach Maß für Ihr CAD-System
www.ib-knepper.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Vielen Dank. Sieht so aus als wenn ich vorher die falschen Suchbegriffe verwendet hatte....

------------------
--
Detlef Jockheck

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP