使用公式中的另一个范围更新一系列公式
我试图找出如何更新引用连续列的一次单元格范围。 基本上,我将用于特定单元格公式的代码是这样的:
Range("C10").Formula = "SUMIF('Site Data '!$CR:$CR,$B$1,'Site Data '!$CU:$CU)"
我想要这个公式从C10:C25和$ CU去CU:DJ。 我似乎无法想出一个方法来做到这一点,而不是为每个公式创build一个新的行。
我只是做每一个,因为它只有16,但这是我需要更新的多组范围之一。
循环遍历行,将迭代var添加到.Columns函数中,并检索地址以连接到公式中。
Dim i As Long With ActiveSheet For i = 10 To 25 .Cells(i, "C").Formula = "=SUMIF('Site Data '!$CR:$CR, $B$1, 'Site Data '!" & _ Worksheets("Site Data ").Columns(89 + i).Address & ")" Next i End With
顺便说一句,这个公式也可以写成:
=SUMIF('Site Data '!$CR:$CR, $B$1, INDEX('Site Data '!$CU:$DJ, 0, ROW(1:1)))
放入C10并填写或作为,
.range("C10:C25").formula = _ "=SUMIF('Site Data '!$CR:$CR, $B$1, INDEX('Site Data '!$CU:$DJ, 0, ROW(1:1)))"