在Excel VBA中,我为具有12,500行的数据表创建了代码。后来,我发现相同的代码对于不同大小的数据表非常有用。
为了更容易,我将所有范围转换为字符串,这样我只需要在代码顶部更改一次字符串,而不是每次都引用范围。
这段代码有一个例子。通过声明" Group_key"在顶部,该范围将自动流入代码。我做了大约30个范围,但有一个范围我无法弄清楚。
在" COUNTIF"等式,它引用了相对范围。我想转换" R6C2:R12500C2"变成一个字符串,但是当我尝试它时,它会自动包含该范围内的引号,并且COUNTIF函数不起作用。
有人知道如何解决这个问题吗?
Sub Format()
Dim Group_key As String
Group_key = "A5:A12500"
Range("AT6").Select
Selection.NumberFormat = "General"
ActiveCell.FormulaR1C1 = "=COUNTIF(R6C2:R12500C2,RC[-44])"
Selection.AutoFill Destination:=Range(Group_key)
End Sub