2

我有以下代码来计算一系列单元格中的最大值:

 Range("E3").Select
 ActiveCell.FormulaR1C1 = "=MAX(RC[-3]:R[50]C[-3])"

如何在我的代码中用变量替换 50?

谢谢你的帮助!

4

2 回答 2

6

你有没有试过这个:

Dim sVal as String
sVal = "50"
ActiveCell.FormulaR1C1 = "=MAX(RC[-3]:R[" & sVal & " ]C[-3])"
于 2012-04-11T01:46:37.080 回答
0

像这样的东西:

Dim somevar as Integer
somevar = 50
ActiveCell.FormulaR1C1 = "=MAX(RC[-3]:R[" + somevar + "]C[-3])"
于 2012-04-11T01:45:16.590 回答