在Excel中使用VBA编程不带ActiveCell

有谁知道是否有可能通过使用VBA的Excel电子表格循环而不使用ActiveCell？

举个例子，如何在VBA中从零开始创buildCOUNTIF函数而不使用ActiveCell（或者明显地调用COUNTIF函数）？

我想避免ActiveCell，因为当你试图操纵一个简单的matrix，特别是在成千上万的单元格循环时，似乎是不必要的资源使用来滚动活动单元格。

Answer 1

Dim c as Range For Each c in Sheets("Sheet1").Range("A1:A1000").Cells 'do something with c Next c 

Answer 2

Tim说什么。

只是为了解决问题的计数部分，这里是一个不使用公式的方法：

 Sub Macro14() Dim c As Range Dim rng As Range Dim count_if As Integer Set rng = Sheets("Sheet1").Range("A1:A1000") For Each c In rng If c = "Apple" Then count_if = count_if + 1 End If Next c Debug.Print count_if End Sub