capital letters

[canablitz]

hi, is there any way to get a column to automatically put a capital letter on the start of each word of the text thats been pasted in

BoB

[Nibbles]

Hi,

Unless you want some VBA I can't think of a way to do it automatically (someone may be able to correct me on this however).

If you're column starts in A1, you could always put this formula in B1 and drag it down:

=UPPER(LEFT(A1,1))&MID(A1,2,999)

Hope this helps,

Nibbs

[Aladin Akyurek]

Try free ASAP-utilities from

http://asap-utilities.com

[Nibbles]

Argh! I'm being silly. If you only have one word in each cell you can just use:

=PROPER(A1)

Nibbs

[Afcb]

Select your cell(s) and run this macro :-

Sub TextProperCase()
Dim rng As Range, cell As Range
Set rng = Intersect(ActiveSheet.UsedRange, Selection)
For Each cell In rng
If cell.HasFormula = False Then
cell.Value = StrConv(cell.Value, vbProperCase)
End If
Next cell
End Sub

[gareth]

Hello Friend

There are lots and lots of ways to do it,but the most convenient is :-
=UPPER(LEFT(A1,1))&MID(A1,2,999)

[fdrl]

On 2002-04-24 02:29, gareth wrote:
Hello Friend

There are lots and lots of ways to do it,but the most convenient is :-
=UPPER(LEFT(A1,1))&MID(A1,2,999)

This capitalises the first letter of only the first word in the cell.

=PROPER(A1) capitalises the first letter of all words in the cell.

In any event, it seems to me that the "most convenient" way is just to select the required cell(s) and click a button - which is all that is required by the suggestions from Aladin Akyurek and Afcb (both these suggestions convert all words to proper case).

It should be noted that Aladin Akyurek's suggestion will convert any cells containing formulas to values only. Afcb's suggestion converts only cells containing constant values.