iLogic: Texte aller gleichnamigen angeforderten Eingaben in skizzierten Symbolen ändern

so kannst man die angeforderte Eingabe aller Symbole, bei der die angeforderte Eingabe "Text_sym" heißt auf einen abgefragten Wert setzen.

Symboltext = InputBox("Wert Symboltext", "Symboltext", "-")
For Each oSS As SketchedSymbol In ActiveSheet.Sheet.SketchedSymbols

		Dim oTB As TextBox
		For Each oTB In oSS.Definition.Sketch.TextBoxes
		  If oTB.Text = "Text_Sym" Then
		    Call oSS.SetPromptResultText(oTB, Symboltext)
		  End If
		Next
Next 

Inventor 2018 IDW: 171127120834332 skizziertes Symbol - Texte kopieren.idw ‏128 KB

[Quelle]