| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
set color of textbox (shape) bullets
I want to change the color of bullets in a textbox (shape) in XL 2007, but
keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
Shouldn't the color be defined in RGB
ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
tried that too, but doesn't do the trick either...
"JLGWhiz" wrote: Shouldn't the color be defined in RGB ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
I believe you are using xl2007, which I know very little about, but if you
could state the error message content, it would help to analyze the problem. "Pat D" wrote: tried that too, but doesn't do the trick either... "JLGWhiz" wrote: Shouldn't the color be defined in RGB ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
yes, i'm using XL07.
the statement I execute is: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .Formatparagraph.Bullet.Font.Color = 255 error message: Run-time error '438': Object doesn't support this property or method FYI: the following statements DO work: Set the bullet character to ASCII(100) ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Character = 100 Set the text color to 125 (brown-ish): ActiveSheet.Shapes("TESTBOX").TextFrame.Characters .Font.Color = 125 "JLGWhiz" wrote: I believe you are using xl2007, which I know very little about, but if you could state the error message content, it would help to analyze the problem. "Pat D" wrote: tried that too, but doesn't do the trick either... "JLGWhiz" wrote: Shouldn't the color be defined in RGB ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
Hi,
Try this, ..TextFrame2.TextRange.ParagraphFormat.Bullet.Font .Fill.ForeColor.RGB = _ vbRed Cheers Andy Pat D wrote: yes, i'm using XL07. the statement I execute is: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .Formatparagraph.Bullet.Font.Color = 255 error message: Run-time error '438': Object doesn't support this property or method FYI: the following statements DO work: Set the bullet character to ASCII(100) ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Character = 100 Set the text color to 125 (brown-ish): ActiveSheet.Shapes("TESTBOX").TextFrame.Characters .Font.Color = 125 "JLGWhiz" wrote: I believe you are using xl2007, which I know very little about, but if you could state the error message content, it would help to analyze the problem. "Pat D" wrote: tried that too, but doesn't do the trick either... "JLGWhiz" wrote: Shouldn't the color be defined in RGB ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.Text Range.ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. -- Andy Pope, Microsoft MVP - Excel http://www.andypope.info |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
set color of textbox (shape) bullets
Works!
thanks bunches, Andy!!! "Andy Pope" wrote: Hi, Try this, ..TextFrame2.TextRange.ParagraphFormat.Bullet.Font .Fill.ForeColor.RGB = _ vbRed Cheers Andy Pat D wrote: yes, i'm using XL07. the statement I execute is: ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .Formatparagraph.Bullet.Font.Color = 255 error message: Run-time error '438': Object doesn't support this property or method FYI: the following statements DO work: Set the bullet character to ASCII(100) ActiveSheet.Shapes("TESTBOX").TextFrame2.TextRange .ParagraphFormat.Bullet.Character = 100 Set the text color to 125 (brown-ish): ActiveSheet.Shapes("TESTBOX").TextFrame.Characters .Font.Color = 125 "JLGWhiz" wrote: I believe you are using xl2007, which I know very little about, but if you could state the error message content, it would help to analyze the problem. "Pat D" wrote: tried that too, but doesn't do the trick either... "JLGWhiz" wrote: Shouldn't the color be defined in RGB ActiveSheet.Shapes"TESTBOX").TextFrame2.TextRange _ .Format.Bullet.Font.Color = RGB(255, 0, 0) "Pat D" wrote: I want to change the color of bullets in a textbox (shape) in XL 2007, but keep getting errors. this is what I have tried: ActiveSheet.Shapes("TESTBOX").TextFrame2.Text Range.ParagraphFormat.Bullet.Font.Color = 255 similarly, when I try to change the font name, character, or other attributes of the bullet, this works just fine. -- Andy Pope, Microsoft MVP - Excel http://www.andypope.info |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Cutting and Pasting Cells into a shape or textbox | Excel Discussion (Misc queries) | |||
| Textbox - Shape | Excel Programming | |||
| Textbox and Bullets | Excel Programming | |||
| Adding shape-type textbox into excel chart sheet | Excel Programming | |||
| Editting textbox value that is grouped with a shape | Excel Programming | |||
![Pat D[_2_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Linear Mode
