使用公式中范围内的每个单元格并将结果返回到同一个单元格中？

Question

我想这应该很容易，但是 - 如何从一个范围内的每个单元格中提取一个值，将该值放入公式中，并将结果返回到原始值所在的同一个单元格中？ 示例:(简化:-)） 我已经在一个范围（比如A1：A3）中输入了值：A1=2.1 ; A2=0.78 ; A3=1.1。我在D1中也有一个特定的因素，例如D1 = 0.4，以及我想要使用的特定公式：exp(ln(value)/factor)。我想要做的是：在A1 (=2.1)

1. 提取物的价值和
2. 地方它的公式中连同因素D1 (=exp(ln(2.1)/0.4))
3. ，并把结果返回中A1 (=6.39)

。 ..等等A2 (=0.54), A3 (=1.27) ......

由于我的范围很大，覆盖了几张纸，我在想某种“for ea在范围CH细胞（myRange）”的功能，但我haven't能弄明白......

Answer 1

要做到这一点，请尝试以下操作：

Dim rng As Range, Cell As Range

然后设置你的Range：

Set rng = Range("A1:A3")

然后开始你的For Each循环：

For Each Cell In rng 
    Cell = Exp(Log(Cell)/Range("D4")) 
Next Cell