Hallo,
ich habe mal wieder ein kleines Problem. Und zwar möchte ich über ein Makro eine Konstruktionstabelle erstellen. Dies ist ja noch relativ einfach und mit "createdesigntable(...)" umsetzbar. Um eine bessere Übersicht zwischen den einzelnen Konstruktionstabellen zu gewährleisten, habe ich verschiedene Beziehungssets angelegt. Leider schaffe ich es aber nicht, die neue Konstruktionstabelle in einem bestimmten Beziehungsset zu erstellen.
Ich hatte folgendes versucht, jedoch ohne Erfolg:
Code:
'***Erzeugen der Konstruktionstabelle für die Kamera
'***************************************************
Dim designTable1 As DesignTable
'***Pfaddefintion für "Konstruktionstabelle Kameras
KTKamPfad = "XYZ\Konstruktionstabelle.xls"'***Kommentar zur Konstruktionstabelle
Dim KTKommentar As Date
KTKommentar = Date '***aktuelles Datum
Dim relations1 As Relations
Set relations1 = part1.Relations
Set relations2 = relations1.Item("Konstruktionstabellen")
Set designTable1 = relations2.CreateDesignTable("Konstruktionstabelle Kamera " & I, "erstellt am: " & KTKommentar, False, "" & KTKamPfad)
designTable1.Configuration = 1
Ich danke euch schonmal für eure Hilfe.
Gruß crob08
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP