使用VBA来设置Excel的小数点，代码有如下几种方式，请根据需要择其一为君用之。
第一种：
Range("A5").Select
Selection.NumberFormatLocal = "0.00_ "
上面的代码功能，是设置A5保留两位小数点。
第二种：
With Application
.FixedDecimal = true
.FixedDecimalPlaces = 3
End With
设置三位小数点。不过这个代码是针对整个工作表的。
第三种：
这种就更简单了。但针对的是参数而言。
zvalue = format(str,"#0.00")
第四种：
Application.WorksheetFunction.Round(A100, 6)
这种是调用函数来实现小数点位数的。