Is it possible to assign fonts using formular?

A

Ayo

I have a formular:
=REPT("|",(VLOOKUP($E$4,SummaryTable,6,FALSE)/200))& " " &
VLOOKUP($E$4,SummaryTable,6,FALSE)

but I need to change the font of the 2nd
"VLOOKUP($E$4,SummaryTable,6,FALSE)" section.
Is this possible to do?
 
C

Chip Pearson

A formula can only return a result to the cell. It cannot modify
anything else, including formatting. If you manually format part of a
cell's content, that formatting will be deleted when the formula is
recalculated.

Cordially,
Chip Pearson
Microsoft MVP 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com
[email on web site]
 
D

Dave Peterson

Check your other post, too.
I have a formular:
=REPT("|",(VLOOKUP($E$4,SummaryTable,6,FALSE)/200))& " " &
VLOOKUP($E$4,SummaryTable,6,FALSE)

but I need to change the font of the 2nd
"VLOOKUP($E$4,SummaryTable,6,FALSE)" section.
Is this possible to do?
 
C

Copacetic

Can I code a script that will, based on a selected value, format a
cell, and then fill it with a result of another cell's lookup value,
carrying the font that the code assigned based on the selected "font
choice"?

Then, my next selection would run the code again, so the code would
have to have several formatting modules that get called by the selected
drop down list value, and that value would get tested for each time the
drop down changes.

That way, I can have a result cell, that has a variable font by way of
one choice, and a variable value by way of another.

Is this possible? It should be a mere formatting script that I copy
and repeat several times, renaming each sub-module and pointing each at a
different font to be made available.



A formula can only return a result to the cell. It cannot modify
anything else, including formatting. If you manually format part of a
cell's content, that formatting will be deleted when the formula is
recalculated.

Cordially,
Chip Pearson
Microsoft MVP 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com
[email on web site]



I have a formular:
=REPT("|",(VLOOKUP($E$4,SummaryTable,6,FALSE)/200))& " " &
VLOOKUP($E$4,SummaryTable,6,FALSE)

but I need to change the font of the 2nd
"VLOOKUP($E$4,SummaryTable,6,FALSE)" section.
Is this possible to do?
 
C

Copacetic

Can I code a script that will, based on a selected value, format a
cell, and then fill it with a result of another cell's lookup value,
carrying the font that the code assigned based on the selected "font
choice"?

Then, my next selection would run the code again, so the code would
have to have several formatting modules that get called by the selected
drop down list value, and that value would get tested for each time the
drop down changes.

That way, I can have a result cell, that has a variable font by way of
one choice, and a variable value by way of another.

Is this possible? It should be a mere formatting script that I copy
and repeat several times, renaming each sub-module and pointing each at a
different font to be made available.



A formula can only return a result to the cell. It cannot modify
anything else, including formatting. If you manually format part of a
cell's content, that formatting will be deleted when the formula is
recalculated.

Cordially,
Chip Pearson
Microsoft MVP 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com
[email on web site]



I have a formular:
=REPT("|",(VLOOKUP($E$4,SummaryTable,6,FALSE)/200))& " " &
VLOOKUP($E$4,SummaryTable,6,FALSE)

but I need to change the font of the 2nd
"VLOOKUP($E$4,SummaryTable,6,FALSE)" section.
Is this possible to do?


Had to re-post this as a new post since a lot of folks do not look at a
response to a post.

Any thoughts on the topic, folks?
 
J

JLGWhiz

Not sure what you are asking, but see if this gets you pointed in the right
direction.

Sub WTTwo() 'Displays each letter with different font and color
diagonally
Dim MyValue, MyString
MyString = "WATCHTHIS"
fnt = Array("Algerian", "Kristen ITC", "Comic Sans MS", "Forte",
"Jokerman", "Colonna MT", "Book Antigua", "Broadway", "Chiller", "Playbill",
"Georgia", "Mistral", "Bauhaus 93", "Eras Bold ITC")
counter = 1
Do
Randomize
MyValue = Int((13 * Rnd) + 1)
If counter <= 5 Then
Cells(counter + 1, counter + 3).Font.Name = fnt(MyValue)
Cells(counter + 1, counter + 3).Font.Size = (counter * 2) +
28
Cells(counter + 1, counter + 3).Font.ColorIndex = (counter *
2) + 4
Cells(counter + 1, counter + 3) = Mid(MyString, counter, 1)
End If
If counter >= 6 Then
Cells(counter - 3, counter + 2).Font.Name = fnt(MyValue)
Cells(counter - 3, counter + 2).Font.Size = (counter * 2) +
28
Cells(counter - 3, counter + 2).Font.ColorIndex = (counter *
3) + 15
Cells(counter - 3, counter + 2) = Mid(MyString, counter, 1)
End If
counter = counter + 1
Beep
'HalfSecDly '<<<separate function not included
Loop Until counter = 10
PauseTime
End Sub



Copacetic said:
Can I code a script that will, based on a selected value, format a
cell, and then fill it with a result of another cell's lookup value,
carrying the font that the code assigned based on the selected "font
choice"?

Then, my next selection would run the code again, so the code would
have to have several formatting modules that get called by the selected
drop down list value, and that value would get tested for each time the
drop down changes.

That way, I can have a result cell, that has a variable font by way of
one choice, and a variable value by way of another.

Is this possible? It should be a mere formatting script that I copy
and repeat several times, renaming each sub-module and pointing each at a
different font to be made available.



A formula can only return a result to the cell. It cannot modify
anything else, including formatting. If you manually format part of a
cell's content, that formatting will be deleted when the formula is
recalculated.

Cordially,
Chip Pearson
Microsoft MVP 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com
[email on web site]



I have a formular:
=REPT("|",(VLOOKUP($E$4,SummaryTable,6,FALSE)/200))& " " &
VLOOKUP($E$4,SummaryTable,6,FALSE)

but I need to change the font of the 2nd
"VLOOKUP($E$4,SummaryTable,6,FALSE)" section.
Is this possible to do?


Had to re-post this as a new post since a lot of folks do not look at a
response to a post.

Any thoughts on the topic, folks?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top