VBA編程Excel中沒有ActiveCell

Question

有誰知道是否有可能通過循環使用VBA不使用ActiveCell Excel電子表格？

舉個例子，你怎麼可以從頭開始創建的VBA COUNTIF函數，而無需使用ActiveCell（或呼籲COUNTIF函數，很明顯）？

我想避免ActiveCell，因爲它似乎是不必要的利用資源，滾動周圍活動單元格時，通常你想操縱簡單的矩陣，尤其是通過成千上萬的細胞中循環時。

Answer 1

Dim c as Range 

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

Answer 2

蒂姆說什麼。

只是爲了解決計數，如果你的問題的一部分，這裏是一個辦法做到這一點不使用公式：

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