excel vba - 使用变量插入公式
问题描述:
您好我想通过确定每个值的变量插入公式到单元格中。excel vba - 使用变量插入公式
例如,
=G5/D5
所以在电池
Sheets("Sheet1").cells(LastRow + 2, 2).value = "=columnletter1 + (lastrow + 2)/columnletter2 + (lastrow + 2)
我找到columnletter为G通过确定列名称为X,行LASTROW + 2 我怎么写,让我得到“= G5/D5“回到了牢房?
答
不知道如果我理解你的要求完全是,我想你的意思是:
columnletter1
是一个字符串,= G
columnletter2
是一个字符串,= D
lastrow
是一个长期的,= 3
要设置公式,请构建一个字符串并写入.Formula
属性
Sheets("Sheet1").cells(LastRow + 2, 2).Formula = _
"=" & columnletter1 & lastrow + 2 & "/" & columnletter2 & lastrow + 2
答
对于下面的矩阵计算,给定的代码(包括带有变量的公式)可能会有所帮助。
For ROW= 0 To K - 1
For COL= 0 To J - 1
Range("G5").Offset(ROW, COL).Select
ActiveCell.FormulaR1C1 = _
"=SUMIFS(R2C5:R500C5,R2C4:R500C4,RC[" & -COL- 1 & "],R2C2:R500C2,R[" & -ROW- 3 & "]C,R2C3:R500C3,R[" & -ROW- 2 & "]C)"
Next
COL= COL + 1
Next
ROW= ROW + 1