单元格函数：count、countA、countBlank

COUNT
官方说明：返回包含数字以及包含参数列表中的数字的单元格的个数.利用函数COUNT可以计算单元格区域或数字数组中数字字段的输入项个数.
大白话:计算日期和数值的有几格,即,能用SUM运算加进数值的内容有几格

COUNTA
官方说明：返回参数列表中非空值的单元格个数.利用函数COUNTA可以计算单元格区域或数组中包含数据的单元格个数.
大白话：计算不是空白的单元格有几格

*不过有时候有些格子看着是空的，实际上未必是空的，所以谨慎使用为好

COUNT：　　　　求数字个数

COUNTA：　　　　非空单元格个数

COUNTBLANK:　　求空值个数

1 Sub count函数()
2 Dim a%, b%, c%
3 a = Range("a1", "f11").Count  '统计单元格数量，这是vba语句（属性？）
4 b = Application.CountA(Range("a1", "f11")) '统计非空单元格数量，这是借用工作表函数
5 c = Application.CountBlank(Range("a1", "f11")) '统计空单元格数量，这也是借用工作表函数
6 End Sub