VBA圆形百分比

Question

我在excel中有以下vba命令

wbImportFrom.Sheets("Sheet 3").Cells(n, 8).Value

返回我的例子

0,128888889

我可以把它变成百分比

Format(wbImportFrom.Sheets("Sheet 3").Cells(n, 8).Value,"Percent")
-- returns 13.00 %

如何将百分比数字舍入为整数（13％）？ 其他例子

0,057 => 6%
0,088571429 => 9%
0,15 => 15%
0,048461538 => 5%
0,128888889 => 13%
0,03 => 3%
0 => 0%

我尝试使用Round和Val函数，但它对我不起作用：p

Answer 1

每当有疑问时，请记录一个宏：）

这是你在尝试的吗？

Format(wbImportFrom.Sheets("Sheet 3").Cells(n, 8).Value,"0%")