Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Sub myText()
Dim oDoc As DrawingDocument
Set oDoc = CATIA.ActiveDocument
Dim oView As DrawingView
Set oView = oDoc.Sheets.ActiveSheet.Views.Item(2)
Dim oText As DrawingText
Set oText = oView.Texts.Add("A1 = 120", 10, 10)
oText.SetParameterOnSubString catSubscript, 2, 1, 1
End Sub