Excel检查由逗号分隔的len字符串

Question

我有字符串

15f,158,1669,187,15,156,47t

如何修剪Len＆lt;＆gt;的所有数据3

所以必须离开

15f,158,187,156,47t

并告诉我删除的内容

Answer 1

@David Zemens的想法..这应该有效。经过测试

Sub test()
Dim str As String
Dim s() As String


str = "15f,158,1669,187,15,156,47t"
s = Split(str, ",")


For i = LBound(s) To UBound(s)

If Len(s(i)) = 3 Then

t = IIf(t = "", s(i), t & "," & s(i))

End If

Next i

MsgBox (t)

End Sub