پرسش شمردن تعداد حروف در سلول اکسل

[AhrimanSefid]

سلام

من یک فایل اکسل دارم که از نام تشکیل شده است حالا نیاز دارم نام های که کوچیک تر از 3 حرف هستند را حذف کنم.
ممنون می شم راهنمایی کنید.
عکس فایل هم ضمیمه کردم.

[amir_ts]

با سلام
کد زیر را امتحان کنید.

[LEFT]Sub test()
Application.ScreenUpdating = False
Dim Cell As Range
For Each Cell In Range("A1:A100")
    If Len(Cell) < 3 Then Cell.EntireRow.Delete
Next Cell
Application.ScreenUpdating = True
End Sub[/LEFT]

[ordouei]

فایل پیوست