excel运用VBA统计选定的单元格数量

如果我们在Excel中选择了一些单元格，可以通过下面的VBA代码来统计所选单元格的数量。例如，如果需要统计表格中某种类型的单元格数量，可以这样操作：

1.单击菜单“编辑→定位”，在弹出的“定位”对话框中单击“定位条件”按钮。

2.如果要统计包含文本的单元格数量，选择“常量”，然后仅勾选“文本”，单击“确定”按钮。如果要统计包含数值的单元格数量，则仅勾选“数值”。如果要统计包含错误公式的单元格，则选择“公式”，仅勾选“错误”。

3.按Alt+F11，打开VBA编辑器，在右侧的代码窗口中输入下面的代码：

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 & "个单元格。"
End Sub

4.将光标定位到代码中，单击“运行”按钮。