| |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für CATIA & Co. |
| |
 | Dassault PLM Integrationen mit der 3DViewStation, eine Pressemitteilung
|
Autor
|
Thema: Zahl runden in 0,5mm schritten (2113 / mal gelesen)
|
moppesle Ehrenmitglied V.I.P. h.c. Konstrukteur
     
 Beiträge: 3437 Registriert: 28.05.2009 CATIA V5 R19 SP9 WIN 7 64bit
|
erstellt am: 05. Jul. 2017 14:57 <-- editieren / zitieren --> Unities abgeben:         
Hallo zusammen, stehe gerade vor der Frage wie ich in 0,5mm schritten runden kann. Code: ceil(`Ø Abfalloch` /1mm)*1mm
Hiermit wird immer auf die nächst Ganzzahl aufgerunget. Bsp. 11.345 ergibt 12 Ich möchte aber 11 Hat jemand einen Tip für mich? ------------------ Gruß Uwe Auch Catia ist nur ein Mensch!  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 05. Jul. 2017 15:15 <-- editieren / zitieren --> Unities abgeben:          Nur für moppesle
Servus Uwe ceil ist ja aufrunden, floor abrunden. Warum nutzt du nicht round (mit Angabe der Einheit und Anzahl der Stellen)? Code: round(`Ø Abfalloch`,"mm",0)
oder sollen auch auf 0,5 Werte gerundet werden (zB aus 11,321mm wird 11,5mm)? Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
moppesle Ehrenmitglied V.I.P. h.c. Konstrukteur
     
 Beiträge: 3437 Registriert: 28.05.2009 CATIA V5 R19 SP9 WIN 7 64bit
|
erstellt am: 05. Jul. 2017 15:23 <-- editieren / zitieren --> Unities abgeben:         
|
Randle Mitglied CAD/PLM Consultant
  
 Beiträge: 751 Registriert: 12.04.2003 Win10 x64 CATIA V5 R18, R19, R21, R27-29
|
erstellt am: 05. Jul. 2017 15:24 <-- editieren / zitieren --> Unities abgeben:          Nur für moppesle
Hallo, ich hatte eine ähnlich Aufgabe mal so gelöst: dblResult = Wert / 0,5 If InStr(1, CStr(dblResult), ",", vbTextCompare) <> 0 Then dblResult = CStr(Round(dblResult, 0) * 0,5) End If Gruß Randle Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tobul Mitglied Physiker
 
 Beiträge: 192 Registriert: 06.05.2003
|
erstellt am: 05. Jul. 2017 15:38 <-- editieren / zitieren --> Unities abgeben:          Nur für moppesle
|
bgrittmann Moderator Konstrukteur
       
 Beiträge: 12054 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 05. Jul. 2017 15:39 <-- editieren / zitieren --> Unities abgeben:          Nur für moppesle
|
moppesle Ehrenmitglied V.I.P. h.c. Konstrukteur
     
 Beiträge: 3437 Registriert: 28.05.2009 CATIA V5 R19 SP9 WIN 7 64bit
|
erstellt am: 06. Jul. 2017 07:23 <-- editieren / zitieren --> Unities abgeben:         
|