Dim n As Double
n = Sh.Range("B10").Value
Dim rate As Double
rate = (datefin - datedepart) / n
Cells(13, n + 3) = datefin
For y = n - 1 To x Step -1
Cells(13, y + 3) = datefin - rate
datefin = datefin - rate
Next y
我有这个简单的循环,它将值从(由用户给出)开始并根据 a (也由用户给出的值计算)for
将值放入 excel 中的单元格中。n
rate
我得到的输出值是正确的,但我想让我的公式在 excel 中可见。例如,如果我按下单元格,D13
我希望它显示我使用的公式。ActiveCell.Formula
我试图用orActiveCell.FormulaR1C1
函数来做,但因为n
它并不总是一个特定的数字(因此在一个特定的单元格上)我找不到如何执行我想要的。
谢谢!!!