Is it possible to display the number of characters in a cell

I would like to click on a cell and obtain a character count. Is it possible?

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not IsEmpty(Target.Value) Then
MsgBox Len(Target.Value)
End If
End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Paul K." <PaulK@discussions.microsoft.com> wrote in message
news:22983985-B875-46E2-B54D-1C2933ADCB4D@microsoft.com...
> I would like to click on a cell and obtain a character count. Is it
possible?

Bob:
Thank you for your help, it works great, this is going to be a great time
saver today!
Paul

"Bob Phillips" wrote:

> 'This is worksheet event code, which means that it needs to be
> 'placed in the appropriate worksheet code module, not a standard
> 'code module. To do this, right-click on the sheet tab, select
> 'the View Code option from the menu, and paste the code in.
>
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> If Not IsEmpty(Target.Value) Then
> MsgBox Len(Target.Value)
> End If
> End Sub
>
> --
>
> HTH
>
> RP
> (remove nothere from the email address if mailing direct)
>
>
> "Paul K." <PaulK@discussions.microsoft.com> wrote in message
> news:22983985-B875-46E2-B54D-1C2933ADCB4D@microsoft.com...
> > I would like to click on a cell and obtain a character count. Is it
> possible?
>
>
>