Macro to find character count in cell

[skip2mylew]

I need a macro that finds out how many characters there are in cell and if there are more than a certain amount I need to run another macro.

[JOHN H. DAVIS]

Does this help?

Sub skip2mylew()

MsgBox Len(ActiveCell)

If Len(ActiveCell) > 3 Then
    'DO SOMETHING
End If
End Sub

[skip2mylew]

Thanks John. Just what I needed.

[JOHN H. DAVIS]

You're welcome. Glad to help out and thanks for the feedback.