| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Two-Color Gradient Fill?
I've discovered the gradient fill for shapes, which I really like. But
it always seems to use black for the shading and a VBA statement such as Fill OneColorGradient. Evidently the RGB colors are used for the forecolor, but the back color is black for the shading. Is there a way to use a TwoColorGradient, using the back RGB colors for the shading? TIA, James |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Two-Color Gradient Fill?
Sub ABC()
Set myDocument = Worksheets(2) With myDocument.Shapes.AddShape(msoShapeRectangle, _ 90, 90, 90, 50).Fill .ForeColor.RGB = RGB(239, 250, 130) .BackColor.RGB = RGB(226, 154, 212) .TwoColorGradient msoGradientHorizontal, 1 End With End Sub -- Regards, Tom Ogilvy "Zone" wrote: I've discovered the gradient fill for shapes, which I really like. But it always seems to use black for the shading and a VBA statement such as Fill OneColorGradient. Evidently the RGB colors are used for the forecolor, but the back color is black for the shading. Is there a way to use a TwoColorGradient, using the back RGB colors for the shading? TIA, James |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Two-Color Gradient Fill?
Sheesh, that was easy. Thanks, Tom.
Tom Ogilvy wrote: Sub ABC() Set myDocument = Worksheets(2) With myDocument.Shapes.AddShape(msoShapeRectangle, _ 90, 90, 90, 50).Fill .ForeColor.RGB = RGB(239, 250, 130) .BackColor.RGB = RGB(226, 154, 212) .TwoColorGradient msoGradientHorizontal, 1 End With End Sub -- Regards, Tom Ogilvy "Zone" wrote: I've discovered the gradient fill for shapes, which I really like. But it always seems to use black for the shading and a VBA statement such as Fill OneColorGradient. Evidently the RGB colors are used for the forecolor, but the back color is black for the shading. Is there a way to use a TwoColorGradient, using the back RGB colors for the shading? TIA, James |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Two-Color Gradient Fill?
Perfect info on this macro. Now if I can just get the color directional
correct. :) "Zone" wrote: Sheesh, that was easy. Thanks, Tom. Tom Ogilvy wrote: Sub ABC() Set myDocument = Worksheets(2) With myDocument.Shapes.AddShape(msoShapeRectangle, _ 90, 90, 90, 50).Fill .ForeColor.RGB = RGB(239, 250, 130) .BackColor.RGB = RGB(226, 154, 212) .TwoColorGradient msoGradientHorizontal, 1 End With End Sub -- Regards, Tom Ogilvy "Zone" wrote: I've discovered the gradient fill for shapes, which I really like. But it always seems to use black for the shading and a VBA statement such as Fill OneColorGradient. Evidently the RGB colors are used for the forecolor, but the back color is black for the shading. Is there a way to use a TwoColorGradient, using the back RGB colors for the shading? TIA, James |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Color gradient problem on X-Y chart | Charts and Charting in Excel | |||
| How do I select two colors for Gradient Fill Excel 2007 | Charts and Charting in Excel | |||
| Charts - Gradient fill Plot Area in Excel 2007 | Charts and Charting in Excel | |||
| How do I turn off gradient fill for data bars in condit. formattin | Excel Discussion (Misc queries) | |||
| Fixed color gradient | Charts and Charting in Excel | |||
Linear Mode
