bonjour tout le monde, je suis en alternance et mon tuteur me demande de créer un macro sur catia. j'ai beaucouq de mal a comprende le language de catia AU SECOUR!!!! mon pb est: differente courbe sont present dans catia et moi je chercherais a les reperer pour pouvoir exectuter une action dessus en manuel je fais for n 514 to 600 par exemple ma macro fontion mé mooi je voudrais qui les repere tout seul pour exceuter mon action dessus par la suite voici le programme Dim hybridShapeCurveExplicit1 As HybridShapeCurveExplicit [surligneur] dim hybridShapeCurveExplicit1 As hybridBodies1.Item("Desassemblage") for each hybridShapeCurveExplicit1 in hybridBodies1.Item("Desassemblage")[/surligneur] cela ne fontionne pas For n = 521 To 550 Set hybridShapeCurveExplicit1 = parameters1.Item("Courbe." & n) Dim reference1 As Reference Set reference1 = part1.CreateReferenceFromObject(hybridShapeCurveExplicit1) Dim hybridShapeFactory1 As HybridShapeFactory Set hybridShapeFactory1 = part1.HybridShapeFactory Dim hybridShapeCurveSmooth1 As HybridShapeCurveSmooth Set hybridShapeCurveSmooth1 = hybridShapeFactory1.AddNewCurveSmooth(reference1) hybridShapeCurveSmooth1.SetTangencyThreshold 0.5 hybridShapeCurveSmooth1.CurvatureThresholdActivity = True hybridShapeCurveSmooth1.CurvatureThreshold = 0.2 hybridShapeCurveSmooth1.MaximumDeviationActivity = True hybridShapeCurveSmooth1.SetMaximumDeviation 3# hybridShapeCurveSmooth1.TopologySimplificationActivity = True