Fonts Inside of Cells

[Minitman]

Greetings,

I am trying to change the font and size the displayed results of a
formula.

I have these four cells (A1, B1, C1 and D1) that I bring together into
another cell, A10. I would like the first reference to be 14 points,
bold and the rest to be 10 point non-bold,

What I have in A10 so far is:

=IF(A1=0,"",A1)&CHAR(10)&IF(B1=0,"",B1)&IF(C1=0,"","
"&C1)&CHAR(10)&IF(D1=0,"",D1)

This produces three line all the same font and size. (The IF statement
are to check if there is anything in the four cell,and remove the
place holder if not). How can I change the font size and bold
attribute?

TIA

-Steve Moulton

 

[Frank Kabel]

Hi
unfortunately you cannot do this in a formula.
The only way is to use some VBA code (though AFAIK a user defined
function is not possible - they are only allowed to return values).

Frank

 

[Minitman]

Hey Frank,

I was afraid of that.

So, how do I do this with VBA?

-Steve Moulton

 

[David McRitchie]

Hi Steve,
You will have to do your own concatenation in VBA, instead
of using a formula, but here is a solution posted by Dave Peterson.
http://google.com/[email protected]
which you can adapt.