VBA Len功能

时间:2016-06-28 13:05:47

标签: excel vba excel-vba

我在VBA中有这段代码:

For x = 4 To 3918
    If InStr(Cells(x, 2), "LW") Then
        numToFind = Cells(x, 1)
        For y = 4 To 3918
            If Cells(y, 1) = numToFind Then
                Cells(y, 1).EntireRow.Interior.ColorIndex = 4
            End If
        Next y
    End If
Next x

但是,我试图将条件从“如果单元格x,2包含字符串”LW“”改为“如果单元格x,2包含5个字符......”在第2行。我无法正确使用len()函数。有人可以帮忙吗?

谢谢!

3 个答案:

答案 0 :(得分:1)

if len(cells(x,2).value)=5然后也可以回答:)

答案 1 :(得分:0)

If Len(Cells(x, 2).value) = 5 Then

答案 2 :(得分:0)

此处:if len(trim(cell( x,2).value)) = 5 then....