如果字符长度大于某个数字，则删除Excel中的前两位数字

在Excel中，我们可以通过VBA宏来实现根据字符长度删除前两位数字的功能。下面是一个实现这个功能的VBA代码：

Sub DeleteDigits()
    Dim rng As Range
    Dim cell As Range
    Dim str As String
    Dim lenThreshold As Integer
    
    '设置字符长度阈值
    lenThreshold = 10
    
    '选择需要处理的数据范围
    Set rng = Selection
    
    '遍历每个单元格
    For Each cell In rng
        '判断单元格中的字符串长度是否大于阈值
        If Len(cell.Value) > lenThreshold Then
            '将字符串转换为字符数组
            str = cell.Value
            Dim charArray() As Char
            charArray = str.ToCharArray()
            
            '删除前两位数字
            str = ""
            For i = 2 To UBound(charArray)
                str = str & charArray(i)
            Next i
            
            '将处理后的字符串赋值给单元格
            cell.Value = str
        End If
    Next cell
End Sub

在上述代码中，我们首先通过Len函数判断字符长度是否大于阈值lenThreshold。如果是，则将字符串转换为字符数组，并通过循环从第三个字符开始拼接成新的字符串。最后，将新的字符串赋值给原单元格。

关于Excel中VBA宏的更多信息和用法，可以参考腾讯云的相关产品介绍链接地址：腾讯云Excel VBA宏介绍。

注意：上述代码是针对Excel中的单元格进行处理的，如果要处理整个Excel文件，可以根据需要进行调整。