Bu CATIA API fonksiyonu ne işe yarar?
Fonksiyon: DMU Optimizer Automation Objects
Cevap:
Sub CATMain()

  Dim doc As Document
  Set doc=CATIA.ActiveDocument

  Dim wkb As OptimizerWorkBench
  Set wkb=doc.GetWorkbench("OptimizerWorkBench") 'Note the uppercase 
B
 in WorkBench

  Dim sil As Silhouettes
  Set sil=wkb.Silhouettes

End Sub