---

Hallo zusammen

wie kann ich in ein Parameterset ein weiteres einfügen.

Das erste erstell ich mit

Set part1 = partDocument1.Part
Dim Params As Parameters
Set Params = part1.Parameters
Params.CreateSetOfParameters part1

aber dann beissts aus.......was muss ich als Vaterobject angeben??

Gruß Andi

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

---

Hallo Augustiner,

Deine nächste (gesuchte) Zeile sollte so lauten:

Code:

---

Params.CreateSetOfParameters Params.RootParameterSet

---

und schon hast Du unter den Parametern ein neues ParameterSet!
Und mit:

Code:

---

Params.CreateSetOfParameters Params.RootParameterSet.ParameterSets.Item(1)

---

darin wieder eins ...

mfg,
Lusilnie

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

---

Vielen Dank das hilft mir schonmal weiter

nur hab ich noch ein Problemchen

wie kann ich dem zweiten Parameterset einen Parameter zuweisen??

Set part1 = partDocument1.Part

Dim Params As Parameters
Set Params = part1.Parameters

Params.CreateSetOfParameters part1

Params.CreateSetOfParameters Params.RootParameterSet

Set Breite = Params.createDimension ("Breite", "Length", 30)

so wird der Parameter Breite ins erste Parameterset gesetzt.

Gruß Andi

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

---

Hallo Augustiner,

es ist zwar eine etwas späte Antwort, doch villeicht brauchst Du sie ja trotzdem noch.
Man kann der Parameter-Definition auch einen Zielort zuweisen. Sollte in Deinem Fall etwa so aussehen:

Code:

---

Dim Params1 As Parameters
Set Params1 = part1.Parameters.Sublist(Params.RootParameterSet.ParameterSets.Item(1),True)
Set Breite = Params1.createDimension ("Breite", "Length", 30)

---

(Habe es allerdings in dieser Form nicht getestet!)

mfg,
Lusilnie

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