Dear Rajesh

Thanks for taking time to send a complete VBA script... This shows how
helpful this group is. Truly amazing folks and moderators.....

However as I asked the last time and forgot again :-(
could you please add a line or two on where to cut and paste this code
for it to work

TIA & regards
Subu

On Jun 24, 2:02 pm, Rajesh Kunder <kunder....@gmail.com> wrote:
> Hey use this code..........
>
> Sub SentenceCase()
> For Each cell In Selection.Cells
> s = cell.Value
> Start = True
> For i = 1 To Len(s)
> ch = Mid(s, i, 1)
>       Select Case ch
>       Case "."
>       Start = True
>       Case "?"
>       Start = True
>       Case "a" To "z"
>       If Start Then ch = UCase(ch): Start = False
>       Case "A" To "Z"
>       If Start Then Start = False Else ch = LCase(ch)
>       End Select
> Mid(s, i, 1) = ch
> Next
> cell.Value = s
> Next
> End Sub
>
> Regards,
> Rajesh kunder
>
> _________________________________________________________________________________________________________
>
> On Wed, Jun 24, 2009 at 1:40 PM, Subu <mail_to_s...@yahoo.com> wrote:
>
> > Dear List members and XL Gurus
>
> > I have an XL sheet with a column that looks something like
>
> > Name_One
> > nAme_two
> > NAME_THREE
> > name_four
> > name_fIVe
> > name   SIX
> > name sevEN
>
> > ...and so on
>
> > I wish to get them all with the first Character in upper case and the
> > rest all in lower case
>
> > I.e. something like
>
> > Name_one
> > Name_two
> > Name_three
> > Name_four
> > Name_five
> > Name   six
> > Name seven
>
> > Thanks in advance
> > Best regards
>
> > Subu

--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---

Reply via email to