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 に答える