View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jock Jock is offline
external usenet poster
 
Posts: 440
Default Proper case using VBA

How can I force 'proper' case for text within excel
The following code forces uppercase, however I would like only the first
letters of each word capitalized: ie Joe Bloggs.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("E3:F200")) Is Nothing Then
Target(1).Value = UCase(Target(1).Value)
End If
Application.EnableEvents = True
End Sub

Can this be tweaked to what I woulf like?
--
tia

Jock