B
BillCPA
What are some ways to insert special characters (card suit symbols, cent
sign, arrows, etc.) on form labels?
sign, arrows, etc.) on form labels?
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
N
Nick
Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
D
David McRitchie
Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
B
BillCPA
My problem is I want to combine some normal characters with some special
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
David McRitchie said:Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
Nick said:Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
D
David McRitchie
Usually this is done by selection on the formula bar.
But you can record a macro while changing such things on the
formula bar and see the changes in a macro.
Sub Macro8()
ActiveCell.Formula = "abc def ghi jkl a"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.ColorIndex = 3
End With
With ActiveCell.Characters(Start:=9, Length:=3).Font
.ColorIndex = 34
End With
With ActiveCell.Characters(Start:=17, Length:=1).Font
.Name = "Wingdings 3"
End With
End Sub
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
But you can record a macro while changing such things on the
formula bar and see the changes in a macro.
Sub Macro8()
ActiveCell.Formula = "abc def ghi jkl a"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.ColorIndex = 3
End With
With ActiveCell.Characters(Start:=9, Length:=3).Font
.ColorIndex = 34
End With
With ActiveCell.Characters(Start:=17, Length:=1).Font
.Name = "Wingdings 3"
End With
End Sub
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
BillCPA said:My problem is I want to combine some normal characters with some special
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
David McRitchie said:Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
Nick said:Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
What are some ways to insert special characters (card suit symbols, cent
sign, arrows, etc.) on form labels?
B
BillCPA
Sorry to be a pain here, but I understand how to do it in a cell. It is
writing code to do it on a form label that has me befuddled.
--
Bill @ UAMS
writing code to do it on a form label that has me befuddled.
--
Bill @ UAMS
David McRitchie said:Usually this is done by selection on the formula bar.
But you can record a macro while changing such things on the
formula bar and see the changes in a macro.
Sub Macro8()
ActiveCell.Formula = "abc def ghi jkl a"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.ColorIndex = 3
End With
With ActiveCell.Characters(Start:=9, Length:=3).Font
.ColorIndex = 34
End With
With ActiveCell.Characters(Start:=17, Length:=1).Font
.Name = "Wingdings 3"
End With
End Sub
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
BillCPA said:My problem is I want to combine some normal characters with some special
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
David McRitchie said:Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
What are some ways to insert special characters (card suit symbols, cent
sign, arrows, etc.) on form labels?
D
Dave Peterson
I didn't see anything that would allow me to do character by character
formatting for a label on a userform.
How about another option--put pictures on the form. If you only have a few
different captions to support, you could add the text to few cells, format it
the way you like and save them as pictures.
formatting for a label on a userform.
How about another option--put pictures on the form. If you only have a few
different captions to support, you could add the text to few cells, format it
the way you like and save them as pictures.
Sorry to be a pain here, but I understand how to do it in a cell. It is
writing code to do it on a form label that has me befuddled.
--
Bill @ UAMS
David McRitchie said:Usually this is done by selection on the formula bar.
But you can record a macro while changing such things on the
formula bar and see the changes in a macro.
Sub Macro8()
ActiveCell.Formula = "abc def ghi jkl a"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.ColorIndex = 3
End With
With ActiveCell.Characters(Start:=9, Length:=3).Font
.ColorIndex = 34
End With
With ActiveCell.Characters(Start:=17, Length:=1).Font
.Name = "Wingdings 3"
End With
End Sub
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
BillCPA said:My problem is I want to combine some normal characters with some special
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
:
Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
What are some ways to insert special characters (card suit symbols, cent
sign, arrows, etc.) on form labels?
B
BillCPA
I've never worked with pictures in VBA. Maybe this is the time to learn.
I'll try that. Thanks.
--
Bill @ UAMS
I'll try that. Thanks.
--
Bill @ UAMS
Dave Peterson said:I didn't see anything that would allow me to do character by character
formatting for a label on a userform.
How about another option--put pictures on the form. If you only have a few
different captions to support, you could add the text to few cells, format it
the way you like and save them as pictures.
Sorry to be a pain here, but I understand how to do it in a cell. It is
writing code to do it on a form label that has me befuddled.
--
Bill @ UAMS
David McRitchie said:Usually this is done by selection on the formula bar.
But you can record a macro while changing such things on the
formula bar and see the changes in a macro.
Sub Macro8()
ActiveCell.Formula = "abc def ghi jkl a"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.ColorIndex = 3
End With
With ActiveCell.Characters(Start:=9, Length:=3).Font
.ColorIndex = 34
End With
With ActiveCell.Characters(Start:=17, Length:=1).Font
.Name = "Wingdings 3"
End With
End Sub
--
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
My problem is I want to combine some normal characters with some special
(Wingding/Symbol) characters. If you are playing with a cell, you can use
'Start' and 'Length' to set various characters with varying characteristics.
But I can't find a way to set the first few characters in a
Label.Caption/Label.Font to normal, and then set a couple of characters to
Symbol or Wingding.
--
Bill @ UAMS
:
Hi Bill,
More specifically, I think you want
the Symbol font char 167 - 170 for card suite,
the cent symbol is probably Char 162 in your normal font,
the arrow symbols are in Wingdings and Wingdings 3.
http://wwww.mvps.org/dmcritchie/rexx/htm/fonts.htm
---
HTH,
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
Try formating the label with the Wingdings font (or other similar symbol
font) and entering the appropriate character.
See Character Map in Windows for keys.
Nick
What are some ways to insert special characters (card suit symbols, cent
sign, arrows, etc.) on form labels?