好不容易找到个可以导出曲线控制点的宏，求修改导出的小数位数为小数点后5位

1. <div class="blockcode"><blockquote>代码粘贴不了哟，该发附件

复制代码

附件中导出曲线控制点的X,Y,Z点的小数精度太低，只有2位数，我希望能多几位，但是不知道在哪里修改，求指点

1.         objWorkSheet.Cells(i + 2, 1) = Round(sketchPoints(i).X * 1000, 2)
   
2.         objWorkSheet.Cells(i + 2, 2) = Round(sketchPoints(i).Y * 1000, 2)
   
3.         objWorkSheet.Cells(i + 2, 3) = Round(sketchPoints(i).Z * 1000, 2)

复制代码

Round(sketchPoints(i).Z * 1000, 2)中的，2就是指保留小数点后2位，改为，5就是保留小数点后5位

1.         objWorkSheet.Cells(i + 2, 1) = Round(sketchPoints(i).X * 1000, 5)
   
2.         objWorkSheet.Cells(i + 2, 2) = Round(sketchPoints(i).Y * 1000, 5)
   
3.         objWorkSheet.Cells(i + 2, 3) = Round(sketchPoints(i).Z * 1000, 5)

复制代码

qiminger 发表于 2018-5-17 13:42
Round(sketchPoints(i).Z * 1000, 2)中的，2就是指保留小数点后2位，改为，5就是保留小数点后5 ...

非常感谢，谢谢你了，祝福你万事如意，520快乐如意