---

Hallo,

wir arbeiten mit DL-Names und ich möchte über ein Makro auf die DL-Name Struktur zugreifen und z.B. ein CATPart öffnen.

Ähnlich wie folgendes Makro:

Sub CATMain()

Dim Datei As CATBSTR
Dim Adoc As Document
Datei = CATIA.FileSelectionBox ("Datei öffnen", "*.CATPart", CATFileSelectionModeOpen)

If Datei <> "" Then

    Set ADoc = CATIA.Documents.Open (Datei)

End If

End Sub

Leider funktioniert das Makro nur, wenn ich in der klassischer File base Strruktur arbeite.

Kennt ihr einen Befehl wie die DL-Name Struktur über ein Makro geöffnet werden kann?

Grüße

Meridian

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

---

Hallo Meridian,

die Such-Funktion hilft bei DL-Name-Poblemen weiter, sie hat auch meine Probleme gelöst.
Hier ein Auszug von einem Programm, mit dem die DL-Pfade in einer Listbox angezeigt werden.

Set DLNames = CATIA.SettingControllers.Item("CATSysDLNameSettingCtrl")
    DLNameList = DLNames.GetDLNameList()
    n = UBound(DLNameList)
    For s = 1 To n
      Me.ListBox_Pfade.AddItem (DLNameList(s))
    Next

Anschließend mit der Pfadauswahl aus der Listbox die Datei normal öffnen.

Klaus

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