Remember Me?

#1
December 15th 04, 01:55 PM
 Rita Palazzi Posts: n/a
Bold part of formula results

Windows XP Professional
Office 2000

I have a formula that produces a sentence based on the value of a cell:

=IF(H18=0,CONCATENATE("Shpt Volume Increased ",TEXT(H18,".0%"),"
Y-O-Y"),CONCATENATE("Shpt Volume Decreased ",(TEXT(-H18,".0%"))," Y-O-Y"))

I want the word "Increased" or the word "Decreased" to be bold in the
resultant cell. Does anyone know the correct way to achieve this?

Rita Palazzi
Senior Engineer / Global Trade Services
FecEx Express

#2
December 15th 04, 01:58 PM
 Frank Kabel Posts: n/a

Hi
this is not possible with formulas

--
Regards
Frank Kabel
Frankfurt, Germany

Rita Palazzi wrote:
Windows XP Professional
Office 2000

I have a formula that produces a sentence based on the value of a
cell:
=IF(H18=0,CONCATENATE("Shpt Volume Increased ",TEXT(H18,".0%"),"
Y-O-Y"),CONCATENATE("Shpt Volume Decreased ",(TEXT(-H18,".0%")),"
Y-O-Y"))

I want the word "Increased" or the word "Decreased" to be bold in the
resultant cell. Does anyone know the correct way to achieve this?

Rita Palazzi
Senior Engineer / Global Trade Services
FecEx Express

#3
December 15th 04, 02:21 PM
 Gary Rowe Posts: n/a

Try putting "Shpt Volume Increased" and "Shpt Volume Decreased" in separate
cells, say A1, A2, bold the Increased and Decreased words and then refer to
Y-O-Y"),CONCATENATE(\$A\$2,(TEXT(-H18,".0%"))," Y-O-Y"))

"Rita Palazzi" wrote:

Windows XP Professional
Office 2000

I have a formula that produces a sentence based on the value of a cell:

=IF(H18=0,CONCATENATE("Shpt Volume Increased ",TEXT(H18,".0%"),"
Y-O-Y"),CONCATENATE("Shpt Volume Decreased ",(TEXT(-H18,".0%"))," Y-O-Y"))

I want the word "Increased" or the word "Decreased" to be bold in the
resultant cell. Does anyone know the correct way to achieve this?

Rita Palazzi
Senior Engineer / Global Trade Services
FecEx Express

#4
December 15th 04, 07:02 PM
 Debra Dalgleish Posts: n/a

You can't format part of a formula result.

Perhaps you could use conditional formatting instead. For example, if
the formula is in cell D5:

Select cell D5
Choose FormatConditional Formatting
From the first dropdown, choose Formula Is
In the formula box, type: =ISNUMBER(SEARCH("increase",D5))
Click the Format button
On the Font tab, select a font colour and style, e.g. Green, Bold
For the second condition, use the formula:
=ISNUMBER(SEARCH("decrease",D5))
and use a different font colour.

Rita Palazzi wrote:
Windows XP Professional
Office 2000

I have a formula that produces a sentence based on the value of a cell:

=IF(H18=0,CONCATENATE("Shpt Volume Increased ",TEXT(H18,".0%"),"
Y-O-Y"),CONCATENATE("Shpt Volume Decreased ",(TEXT(-H18,".0%"))," Y-O-Y"))

I want the word "Increased" or the word "Decreased" to be bold in the
resultant cell. Does anyone know the correct way to achieve this?

Rita Palazzi
Senior Engineer / Global Trade Services
FecEx Express

--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

#5
December 16th 04, 07:51 PM
 Ron Rosenfeld Posts: n/a

On Wed, 15 Dec 2004 07:55:41 -0600, Rita Palazzi wrote:

Windows XP Professional
Office 2000

I have a formula that produces a sentence based on the value of a cell:

=IF(H18=0,CONCATENATE("Shpt Volume Increased ",TEXT(H18,".0%"),"
Y-O-Y"),CONCATENATE("Shpt Volume Decreased ",(TEXT(-H18,".0%"))," Y-O-Y"))

I want the word "Increased" or the word "Decreased" to be bold in the
resultant cell. Does anyone know the correct way to achieve this?

Rita Palazzi
Senior Engineer / Global Trade Services
FecEx Express

You need to use VBA to accomplish this.

Depending on your setup, you would probable execute this formula in a VB
worksheet change module. The output from the VB macro would be a string which
would go into the cell. When there is just a string in a cell, and not a
formula, a portion of that string can be bolded.

Here is an example that might get you started. To enter it, right-click on the
worksheet tab, then paste the code below into the window that opens. If you
enter something in H18, you will see the result, with the one word bolded, in
H1.

========================
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range, Chg As Range
Dim res As String 'Result will be stored here

Set c = [H1] 'This is where the result will be
Set Chg = [H18] 'Cell to be tested

If Intersect(Target, Chg) Is Nothing Then Exit Sub

res = "Shpt Volume "
Select Case Chg
Case Is 0
res = res & "Increased "
Case Is < 0
res = res & "Decreased "
Case Else
res = res & "Unchanged "
End Select

res = res & Application.WorksheetFunction.Text(Chg, ".0%;.0%;;") & " Y-O-Y"

With c
.Value = res
.Characters(13, 9).Font.Bold = True
End With
===========================

--ron

 Posting Rules Smilies are On [IMG] code is On HTML code is OffTrackbacks are On Pingbacks are On Refbacks are On

 Similar Threads Thread Thread Starter Forum Replies Last Post Adam Excel Discussion (Misc queries) 1 December 15th 04 03:38 AM ocbecky Excel Discussion (Misc queries) 4 December 10th 04 08:39 PM Reg Besseling Excel Discussion (Misc queries) 2 December 10th 04 07:35 AM Matt Excel Discussion (Misc queries) 2 December 7th 04 08:37 PM Arvi Laanemets Excel Discussion (Misc queries) 0 December 2nd 04 11:29 AM

All times are GMT +1. The time now is 12:28 AM.