Vba 使用和显示超过2位小数

Vba 使用和显示超过2位小数,vba,format,ms-project,Vba,Format,Ms Project,我想使用超过2位小数来计算我的MS Project 到目前为止,我找不到任何资源告诉我如何在一个字段中显示2个以上的小数点(例如工时或成本),也找不到如何截断数字而不是四舍五入(比如说,从12.357美元到12.35美元,而不是12.36美元) 有没有办法做到这一点?它可以通过VBA或任何你能想到的方法实现。你可以使用超过2位小数,只是不能在用户界面中使用。 用户界面将显示和输入的值截断为2位小数。但是,通过VBA输入和访问的值没有此限制 例如,使用中间窗口(VBA),输入激活项目的前两个任务的

我想使用超过2位小数来计算我的MS Project

到目前为止,我找不到任何资源告诉我如何在一个字段中显示2个以上的小数点(例如工时或成本),也找不到如何截断数字而不是四舍五入(比如说,从12.357美元到12.35美元,而不是12.36美元)


有没有办法做到这一点?它可以通过VBA或任何你能想到的方法实现。

你可以使用超过2位小数,只是不能在用户界面中使用。 用户界面将显示和输入的值截断为2位小数。但是,通过VBA输入和访问的值没有此限制

例如,使用中间窗口(VBA),输入激活项目的前两个任务的成本,然后请求值以证明它们是按输入的方式存储的,最多16位:

ActiveProject.Tasks(1).Cost = 0.1234567890123456789
ActiveProject.Tasks(2).Cost = 123456789012.123456789

? ActiveProject.Tasks(1).Cost
 0.123456789012346 
? ActiveProject.Tasks(2).Cost
 123456789012.123 

要在UI中显示存储的值,请使用Format函数自定义文本字段:


您可以使用两位以上的小数,但不能在用户界面中使用。 用户界面将显示和输入的值截断为2位小数。但是,通过VBA输入和访问的值没有此限制

例如,使用中间窗口(VBA),输入激活项目的前两个任务的成本,然后请求值以证明它们是按输入的方式存储的,最多16位:

ActiveProject.Tasks(1).Cost = 0.1234567890123456789
ActiveProject.Tasks(2).Cost = 123456789012.123456789

? ActiveProject.Tasks(1).Cost
 0.123456789012346 
? ActiveProject.Tasks(2).Cost
 123456789012.123 

要在UI中显示存储的值,请使用Format函数自定义文本字段: