Excel vba的问题⼀

2024-11-27 10:39:01

推荐回答（2个）

回答1：

Sub 统计行数()
    Dim n As Long
    Dim i As Long
    Dim 字符大于二的数量 As Long
    n = Range("A65536").End(xlUp).Row
    For i = 1 To n
        If Len(Range("A" & i).Value) > 2 Then
            字符大于二的数量 = 字符大于二的数量 + 1
        End If
    Next i
    MsgBox "字符大于二的数量为：" & 字符大于二的数量
End Sub

以上代码可以统计当前工作表A列字符数大于二的数量。

由代码可以看出，VBA变量可以用中文。

回答2：

术介工要进而