VBA SolidsToSimulation

‚VBA Makro um Gruppierte Solids in die Simulation zu übernehmen Sub SolidsToSimulation() Dim I As Long, SS As Esprit.SimulationSolid, G As Esprit.GraphicObject With Document.Group For I = 1 To .Count …

Werkzeug bezogen auf den Kopfdurchmesser einer Senkung

Das Werkzeug wird bezogen auf den halben Kopfdurchmesser +1mm einer Senkung aus der Datenbank geholt: GetToolByID(GetToolByDiameter(155,Round(Feature.CounterBoreDiameter/2+1,1),False,,,, „Center4CNC“)) dabei eine KBMRule verwenden: ESPRIT_RULE_DEFINITION_FILE BEGIN_CODEMODULE PARENT_RULE_MODULE_NAME: ESPRIT Objects CODE_MODULE_NAME: Center4CNC CODE_MODULE_TYPE: 0 …