Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
Jacques.Grobler
1436 Views, 4 Replies

VBA text to parameter

Hi all

 

I am trying to pass VBA userform TEXT to Inventor Parameters (NOT custom iProperties). Below is what I use to pass VALUES.

 

 

Sub param_Change(paramName As String, paramValue)

    'Get the Parameters Object. Assumes a Part or Assembly document as active
    Dim oParam As Parameter
    Set oParam = ThisApplication.ActiveDocument.ComponentDefinition.Parameters

    'Get the Parameter required
    Dim oParamName As Parameters
    Set oParamName = oParam.Item(paramName)

    'Change the equation of parameter
    oParamName.Expression = paramValue

    'Update document
    ThisApplication.ActiveDocument.Update

End Sub

How can I change this to pass TEXT and VALUES?

 

 

 

Tags (2)