自定义函数公式在一个单元中工作，但不是另一个

我试图保存一个公式作为一个同事的自定义函数，因为它不断出现，她需要它。 我终于设法让它工作 – 在一个单元格上。 但它不在另一个单元格上工作。

数据：

结果需要 45.00 486.00

结果需要 43.50 108.00

Excel中的公式是=ROUNDUP((D16/C16)*4,0)/4

我认为在VBA模块中是这样的

 Function RoundQuantity(Amount, Rate) As Integer RoundQuantity = Application.RoundUp((Amount / Rate) * 4, 0) / 4 End Function 

当我从Excel中调用这个函数时，我正在使用=RoundQuantity(D16,C16) ，它成功地从10.48变为11.00，但它变为2.48到2.00。

只是为了解释这个函数，我试图把数量（第一列）凑到最接近的一点。

请帮忙？

Answer 1

虽然我没有完全得到nearest quarter一个词，你评估为2.00的原因很简单 – 你的函数返回一个整数。 只要将Function RoundQuantity(Amount, Rate) As Integer为Function RoundQuantity(Amount, Rate) ，它应该返回2.50 ，前提是格式正确。

看到我的截图如下：

让我们知道这是否有帮助。