我正在尝试在VBA中创建一个COUNTIF公式,以计算带有注释的单元格数量。我必须使用“> *”表达式,但VBA似乎不接受*。每当我运行代码时,都会出现编译错误,提示“ Expected:expression”。
通常我会使用Application.WorkSheet,但是如果以后尝试自动填充,它将返回相同的值。
当前代码
Range("Q2:Q250").Formula = "=COUNTIF(R2:TQ2, ">*")"
“自动填充”使用此值重复
Range("Q2").Value = Application.WorksheetFunction.CountIf(Range("R2:TQ2"),
">*")
Range("Q2").Select
Selection.AutoFill Destination:=Range("Q2:Q250"), Type:=xlFillDefault