如何以百分比形式返回函数？

Question

我想创建一个以百分比形式返回数字的函数。

示例：

Function variation (fv as long, pv as long) as long
    variation = (fv/pv) - 1
End Function

我想知道我是否可以返回百分比值（0,00％）我已经尝试了这两种方式但没有成功。

variation.Style = "0,##%"

和

variation.NumberFormat = "0,##%"

Answer 1

长期只能存储整数。将返回值设置为double以存储百分比。

Function variation(fv As Long, pv As Long) As Double
    variation = (fv / pv) - 1
End Function

这将返回正确的值以供在单元格中使用。

如果您想创建一个带有百分号的字符串输出以用作显示器，那么只需将其添加如下：

Function variation(fv As Long, pv As Long) As String
    variation = (fv / pv) - 1 & "%"
End Function