Column formatting

  • Thread starter Thread starter Dehlia
  • Start date Start date
D

Dehlia

I have Excel 97. Thousands of names are listed in a column. For each
of these names I'm required to a) increase the size of the initial
letter and b) change the color of such letter. The format painter
doesn't allow me to transfer the format from one cell to the remaining
cells, i.e. instead of painting the color to the initial letter only,
it paints the color to the whole name.

If I could use conditional formatting to do this job I'd be right
pleased (esp. as I'll have to add a few extra thousand names to this
column and change them over often). Trouble is I don't know how to
set this up. I'd be so grateful if someone would give me a hint.
 
Hi
you may use th following macro. Select your cells and invoke the macro:

----
Sub first_letter()
Dim rng As Range
Dim cell As Range

Set rng = Selection
For Each cell In rng
If cell.Value <> "" Then
cell.Characters(1, 1).Font.Color = 3
cell.Characters(1, 1).Font.Size = 14
End If
Next
End Sub
 
Back
Top