引用excel总和范围的单元格

我正在制作一个电子表格,其中一些费用根据条件分配为0或1,如下所示;

Range("V12").Select ActiveCell.Formula = "=IF(T12 < 50000000, 1, 0)" Range("V12").Select Selection.AutoFill Destination:=Range("V12:V511"), Type:=xlFillDefault Range("V12:V511").Select Calculate 

Range("V12:V511").Select从V12开始,但我需要最后的单元格根据单元格U3中放置的数量来更改。 我不知道如何做到这一点,但实质上我希望能够沿着Range("V12:VRange("U3").Value - 1").Select行写入内容Range("V12:VRange("U3").Value - 1").Select U3在这个范围内使用。

另外,我想总结这些0和1的范围,但不知道如何dynamic地改变一个总和的限制。

Range需要一个string,所以我们只需要连接U3的值和地址string的其余部分。

所有这些行可以被replace为:

 ActiveSheet.Range("V12:V" & ActiveSheet.Range("U3")-1).Formula = "=IF(T12 < 50000000, 1, 0)" 

或者,如果您偏好R1C1表示法:

 ActiveSheet.Range("V12:V" & ActiveSheet.Range("U3")-1).FormulaR1C1 = "=IF(RC[2] < 50000000, 1, 0)"