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.
Language= "VBScript"
Sub CATMain()
Dim oDoc1
Set oDoc1 = CATIA.ActiveDocument
Dim oPart1
Set oPart1 = oDoc1.Part
Dim oSel
Set oSel = oDoc1.Selection
Dim InputObjectType(0)
InputObjectType(0) = "Part"
oSel.Clear
status= oSel.SelectElement2(InputObjectType, "Choose body to measure", False)
CATIA.StartCommand "Wall Thickness Analysis"
End Sub