如果我們?cè)贓xcel中選擇了一些單元格,可以通過(guò)下面的VBA代碼來(lái)統(tǒng)計(jì)所選單元格的數(shù)量。例如,如果需要統(tǒng)計(jì)表格中某種類(lèi)型的單元格數(shù)量,可以這樣操作:
1.單擊菜單“編輯→定位”,在彈出的“定位”對(duì)話框中單擊“定位條件”按鈕。
2.如果要統(tǒng)計(jì)包含文本的單元格數(shù)量,選擇“常量”,然后僅勾選“文本”,單擊“確定”按鈕。如果要統(tǒng)計(jì)包含數(shù)值的單元格數(shù)量,則僅勾選“數(shù)值”。如果要統(tǒng)計(jì)包含錯(cuò)誤公式的單元格,則選擇“公式”,僅勾選“錯(cuò)誤”。
3.按Alt+F11,打開(kāi)VBA編輯器,在右側(cè)的代碼窗口中輸入下面的代碼:
Sub Count_Selection()
Dim cell As Object
Dim count As Long
count = 0
For Each cell In Selection
count = count + 1
Next cell
MsgBox "共選擇了" & count & "個(gè)單元格。"
End Sub
4.將光標(biāo)定位到代碼中,單擊“運(yùn)行”按鈕。