---

Hallo, ich möchte bestimmte Parameter einer geöffneten *.ipt verarbeiten.

Code:

---

    Dim oApp As Inventor.Application
    Set oApp = ThisApplication

    Dim oDoc As Document
    Set oDoc = oApp.ActiveDocument   

    Dim oParam As Parameter
   
    oParam = oDoc.ComponentDefinition.Parameters.Item(1)
   
   
    Dim sOutput As String
   
    sOutput = oParam.Value
    MsgBox ("Parameter: " & sOutput)

---

In der fett gedruckten Zeile gibt es die Fehlermeldung: "Unzulässige Verwendung einer Eigenschaft"

Was mache ich falsch?

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

---

Moin

Objekte immer mit "Set" zuweisen. Nur Strings und Zahlenwerte ohne Set. Vielleicht gibt's eine Ausnahme, mir fällt gerade keine ein.
Ist das ein Textparameter? Ansonsten ist der Inhalt von Value ein Doublewert in der internen Datenbankeinheit cm, kein String.

EDIT: Befasse dich unbedingt in nächster Zeit auch mal mit dem Setzen von Haltepunkten und der Überwachung von Variablen unter VBA.

------------------
MfG
Ralf

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

---

Danke für die Hilfe, es funktioniert jetzt.

Das mit den Haltepunkten und Überwachung von Variablen sollte ich mir wirklich mal (wieder) anschauen. Ist aber leider ein Zeitproblem, da ich nur gelegentlich schnell was programmiere, wenn ich als Konstrukteur für mich ein Tool baue.

Da vergisst man auch immer mal Dinge, die man schon mal drauf hatte, wenn man es nicht ständig braucht.

Meist behelfe ich mir, indem ich zwischendurch über msgbox ein paar Zwischenwerte ausgeben lasse.

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