我正在使用JXLX,需要在特定行上添加Excel公式。从阵列填充的行数据ara。我的excel模板是这样的:
Name Total
------ --------
${array.name} =SUMIF(Name,$A2,Data!$G2:$G10)
在这个公式中,A2代表产品名称,并且应该在每一行中相应地改变,即A3,A4等。不是很有趣,但G2和G10是不同表格中的数量数据。
那么如何在每一行中更改A2?
答案 0 :(得分:1)
虽然我不确定我是否完全理解这个问题,但我看到了几个解决方案:
删除第一个单元格中A2之前的'$',然后将单元格拖动/复制到下面的所有行(单元格突出显示时右下角的黑框)。
假设这个问题与编程有关,因为你有一个例行程序而且每次都不想做选项#1 ...用正确的行号查找和替换公式中的'$ A2'
假设'Total'列为'B',行为1至10。
Sub LoopRange()
Dim rCell As Range
Dim rRng As Range
Set rRng = Sheet1.Range("B1:B10")
For Each rCell In rRng.Cells
Dim row As String
row = "$A" & rCell.row
rCell.Replace What:="$A2", replacement:=row, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=True
Next rCell
End Sub