excel vba - 使用变量插入公式

时间:2012-08-27 05:53:29

标签: variables excel-vba excel-formula vba excel

您好我想通过确定每个值的变量将公式插入单元格。

EG。

=G5/D5

所以在单元格中

Sheets("Sheet1").cells(LastRow + 2, 2).value = "=columnletter1 + (lastrow + 2)/columnletter2 + (lastrow + 2)

通过确定列名是否为X并且行是LastRow + 2,我发现列号是G. 如何编写以便将“= G5 / D5”返回到单元格中?

2 个答案:

答案 0 :(得分:2)

我不确定我是否完全理解您的要求,我认为您的意思是:

columnletter1是一个字符串,= G
columnletter2是一个字符串,= D
lastrow是一个很长的,= 3

要设置公式,请构造一个字符串并写入.Formula属性

    Sheets("Sheet1").cells(LastRow + 2, 2).Formula = _
    "=" & columnletter1 & lastrow + 2 & "/" & columnletter2 & lastrow + 2

答案 1 :(得分:1)

对于下面的矩阵计算,包含带变量的公式的给定代码可能会有所帮助。

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