checking number of characters in a cell macro

thnks Leith for ur interest

yes i do need vba

here's a sample of code :

Dim c As Range

For Each c In Range("A:A")
   


If Len(Selection) > 5 Then

'the code should highlight the cell where the exceed exists in red color
Next c

here i need "selection" to be defined (cells in range A:A), you see

regards