如何统计Excel列中含小数点的单元格行数并赋值给变量

方法1：直接用工作表公式统计 #

如果只需要得到统计结果，在任意空白单元格输入以下公式即可：

=COUNTIF(F:F,"*.*")

公式说明：COUNTIF函数按条件计数，"*.*"是通配符匹配规则——*代表任意长度的任意字符，因此该规则会匹配所有包含小数点（.）的单元格，示例数据中返回结果为4。

方法2：VBA代码赋值给变量X #

如果需要将统计结果赋值给变量X用于后续操作，可使用以下VBA代码：

Sub GetDecimalCellCount()
    Dim X As Long
    ' 统计F列中包含小数点的单元格总数
    X = Application.WorksheetFunction.CountIf(Range("F:F"), "*.*")
    
    ' 可选：验证结果（比如弹出消息框显示X的值）
    ' MsgBox "符合条件的单元格数量：" & X
End Sub

代码说明：

• 定义X为长整型变量存储计数结果
• 调用工作表函数CountIf完成统计，逻辑和公式法一致
• 可根据需求添加后续使用X的代码逻辑

内容的提问来源于stack exchange，提问作者SneakyKeys1025