---

Hallo,
habe bisher nur in Excel VBA programmiert.
Der Makro-Recorder fehlt im Inventor?!
Wie müsste ein Makro aussehen um eine benutzerdefinierte Variable in den Eigenschaften einer *.ipt zu erzeugen?

Ich gehe auf Eigenschaften
wähle die Regisiterkarte  < Benutzerdefiniert >
und füge einen Namen z.B.  < Abmessung >  hinzu.

Wünsche Frohe Weihnachten

K. W.

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

---

Willkommen im weihnachtlichen Inventor-Forum.
Bevor ich lange die Suchfunktion benutze hier mal ein Beispiel aus anderen Beiträgen.

Public Sub AddPlotStamp()
 
    On Error Resume Next
   
    'einsetzbar nur bei Zeichnungsdokumenten
    If ThisApplication.ActiveDocumentType = kDrawingDocumentObject Then
   
        ' benutzerdefinierte Variable benutzen
        Set oPropSet = ThisApplication.ActiveDocument.PropertySets("{D5CDD505-2E9C-101B-9397-08002B2CF9AE}")
       
        ' löschen der benutzerdefinierten Variable Plotstamp
        oPropSet.Item("Plotstamp").Delete
       
        'Trenner zwischen Datum und Uhrzeit ist /
        ' erzeugen der benutzerdefinierten Variable Plotstamp
        Call oPropSet.Add(Format(Date) & " / " & Format(Time, "hh:mm"), "Plotstamp")
    End If
   
End Sub

------------------
gruß
robby

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

---

Danke für die Antwort. Komme aber nicht weiter damit.

Hier nochmal das Problem:
Ich möchte über ein Makro in bestehende *.ipt's
mehrere Benutzerdefinierte Felder in den Eigenschaften einfügen :

Liefervorschrift
Abmessung
Norm_Rohteil  usw.

Da ich diese Felder später in der Stückliste ausgeben möchte und diese in über 100 verschiedenen *.ipt's eingefügt werden sollen brauche ich ein Makro, das diese Variablen erzeugt, um Schreibfehler zu vermeiden.

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

---

Konstruktionseigenschaften_kopieren.GIF

Hi VOSTA1,
ach so? Das geht mit dem DesignAssi viel einfacher.

Einen schönen Feierabend und Frohe Weihnachten.

------------------
gruß
robby

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