ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Bold Font question (https://www.excelbanter.com/excel-discussion-misc-queries/154451-bold-font-question.html)

Jenny B.

Bold Font question
 
Good Afternoon All,

I currently have a formula that pulls data results from one page and places
them in another along with additional text. I've seen several posts that
note bolding one word is not possible and I'm just wondering if that is in
fact correct. I've been able to change single words to Caps if needed (see
Exp. 1), but I'm able to just write Bold and get the same results (Exp. 2).

Thank you for your review as always and appreciate any thoughts or advice -
Jenny B.

Exp. 1 (Works)
="This questionnaire asks you to evaluate the job performance of" &" " &
Upper('Test Results Data'!G49) & " " &Upper('Test Results Data'!F49) &"." &"
" & "The information you are providing is for research purposes only, and
will not become part of the employee's official record."

Exp.2 (Does not Work)
="This questionnaire asks you to evaluate the job performance of" &" " &
Bold('Test Results Data'!G49) & " " &Bold('Test Results Data'!F49) &"." &" "
& "The information you are providing is for research purposes only, and will
not become part of the employee's official record."

Duke Carey

Bold Font question
 
Alas - there isn't a way to make only a portion of a formula bold

UPPER() works because that is an Excel function.

There is no similar function to change the font or font attribute of a string.



"Jenny B." wrote:

Good Afternoon All,

I currently have a formula that pulls data results from one page and places
them in another along with additional text. I've seen several posts that
note bolding one word is not possible and I'm just wondering if that is in
fact correct. I've been able to change single words to Caps if needed (see
Exp. 1), but I'm able to just write Bold and get the same results (Exp. 2).

Thank you for your review as always and appreciate any thoughts or advice -
Jenny B.

Exp. 1 (Works)
="This questionnaire asks you to evaluate the job performance of" &" " &
Upper('Test Results Data'!G49) & " " &Upper('Test Results Data'!F49) &"." &"
" & "The information you are providing is for research purposes only, and
will not become part of the employee's official record."

Exp.2 (Does not Work)
="This questionnaire asks you to evaluate the job performance of" &" " &
Bold('Test Results Data'!G49) & " " &Bold('Test Results Data'!F49) &"." &" "
& "The information you are providing is for research purposes only, and will
not become part of the employee's official record."


Dave Peterson

Bold Font question
 
Just to make clear...

This won't work with a formula--if Jenny converts the formulas to values, then a
technique like this will work.

bj wrote:

I miss read your posting.
you can write a macro to change part of a text field to bold or to a color
font. but you have to be able to lengths of each section

with your example the macro might be something like the macro below if the
length of the stuff to be bolded were 36
note you would nneed ot save and paste as values first
sub bld()
Range("K15").Select

With ActiveCell.Characters(Start:=1, Length:=63).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=64, Length:=36).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=101, Length:=125).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub

"bj" wrote:

what version of excel are you using. it does not work in 2003

"Jenny B." wrote:

Good Afternoon All,

I currently have a formula that pulls data results from one page and places
them in another along with additional text. I've seen several posts that
note bolding one word is not possible and I'm just wondering if that is in
fact correct. I've been able to change single words to Caps if needed (see
Exp. 1), but I'm able to just write Bold and get the same results (Exp. 2).

Thank you for your review as always and appreciate any thoughts or advice -
Jenny B.

Exp. 1 (Works)
="This questionnaire asks you to evaluate the job performance of" &" " &
Upper('Test Results Data'!G49) & " " &Upper('Test Results Data'!F49) &"." &"
" & "The information you are providing is for research purposes only, and
will not become part of the employee's official record."

Exp.2 (Does not Work)
="This questionnaire asks you to evaluate the job performance of" &" " &
Bold('Test Results Data'!G49) & " " &Bold('Test Results Data'!F49) &"." &" "
& "The information you are providing is for research purposes only, and will
not become part of the employee's official record."


--

Dave Peterson

Jenny B.

Bold Font question
 
Thank you everyone for all of your helpful suggestions.

Though you are correct that a macro might do the job, I was just looking for
a simple fix and at least now I have my answer.

Thank you once again - Jenny B.

"Dave Peterson" wrote:

Just to make clear...

This won't work with a formula--if Jenny converts the formulas to values, then a
technique like this will work.

bj wrote:

I miss read your posting.
you can write a macro to change part of a text field to bold or to a color
font. but you have to be able to lengths of each section

with your example the macro might be something like the macro below if the
length of the stuff to be bolded were 36
note you would nneed ot save and paste as values first
sub bld()
Range("K15").Select

With ActiveCell.Characters(Start:=1, Length:=63).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=64, Length:=36).Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=101, Length:=125).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub

"bj" wrote:

what version of excel are you using. it does not work in 2003

"Jenny B." wrote:

Good Afternoon All,

I currently have a formula that pulls data results from one page and places
them in another along with additional text. I've seen several posts that
note bolding one word is not possible and I'm just wondering if that is in
fact correct. I've been able to change single words to Caps if needed (see
Exp. 1), but I'm able to just write Bold and get the same results (Exp. 2).

Thank you for your review as always and appreciate any thoughts or advice -
Jenny B.

Exp. 1 (Works)
="This questionnaire asks you to evaluate the job performance of" &" " &
Upper('Test Results Data'!G49) & " " &Upper('Test Results Data'!F49) &"." &"
" & "The information you are providing is for research purposes only, and
will not become part of the employee's official record."

Exp.2 (Does not Work)
="This questionnaire asks you to evaluate the job performance of" &" " &
Bold('Test Results Data'!G49) & " " &Bold('Test Results Data'!F49) &"." &" "
& "The information you are providing is for research purposes only, and will
not become part of the employee's official record."


--

Dave Peterson



All times are GMT +1. The time now is 09:19 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com