12-11-2023
03:46 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
12-11-2023
03:46 AM
Hi,
I'm using the latest version of Inventor 2023.
It works on my side, I can no longer reproduce the error.
Can you try this modification:
Catch oPara.AddByValue("SML", "Wert1", kTextUnits) MultiValue.SetList("SML", "Wert1", "Wert2", "Wert3") End Try
I broke the code into two parts:
- Create the parameter if it does not exist:
oPara = ThisApplication.ActiveDocument.ComponentDefinition.Parameters.UserParameters Try Param = Parameter.Param("SML") Catch oPara.AddByValue("SML", "Wert1", kTextUnits) MultiValue.SetList("SML", "Wert1", "Wert2", "Wert3") End Try
- Modify the value of the existing parameter:
Parameter.Param("SML").Value = InputListBox("bitte doppelklick auf Auswahl", MultiValue.List("SML"), SML, Title := "SML nach Vornummer", ListName := "Liste") iLogicVb.UpdateWhenDone = True Parameter.UpdateAfterChange = True InventorVb.DocumentUpdate()
If you test each part separately, what results do you get?
Vincent.