Two formats within one cell

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Jo Ke - 29 Nov 2007 16:51 GMT

I know that Excel will allow separate formatting of data within a cell
(i.e. "37715CCC", where the numbers ("37715") are "blue" & "bold" and
the letters ("CCC") are "black", "bold" & "italic") ., but is there a
way (VBA) of going thru a selection of cells, finding the letters,
make them "blue" & "bold" and the numbers "black", "bold" & "italic".?
I'm just trying to make the alphanumeric data easier to read (you know
distinguishing "O" from "0").

Reply to this Message

sebastienm - 29 Nov 2007 17:26 GMT

Hi
Try the following code. It only works for cells with the formats:
<numbers><characters>
but that's a starting point.

Signature

Regards,
Sébastien
<http://www.ondemandanalysis.com>

> I know that Excel will allow separate formatting of data within a cell
> (i.e. "37715CCC", where the numbers ("37715") are "blue" & "bold" and
[quoted text clipped - 3 lines]
> I'm just trying to make the alphanumeric data easier to read (you know
> distinguishing "O" from "0").

Reply to this Message

Don Guillett - 29 Nov 2007 17:53 GMT

From vba help index for CHARACTERS

With Worksheets("Sheet1").Range("B1")
.Value = "New Title"
.Characters(5, 5).Font.Bold = True
.Characters(15, 5).Font.colorindex=5
End With

Signature

Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com

>I know that Excel will allow separate formatting of data within a cell
> (i.e. "37715CCC", where the numbers ("37715") are "blue" & "bold" and
[quoted text clipped - 3 lines]
> I'm just trying to make the alphanumeric data easier to read (you know
> distinguishing "O" from "0").

Reply to this Message