April 2006
Beginner
1114 pages
98h 16m
English
fillformat.BackColor
Returns a ColorFormat object you can use to set the background color. The following code draws a green tuna can on the active worksheet:
Sub FillFormatMembers( )
Dim ws As Worksheet, s As Shape
Set ws = ActiveSheet
' Draw can.
Set s = ws.Shapes.AddShape(msoShapeCan, 20, 20, 40, 40)
' Set green fill.
s.Fill.ForeColor.RGB = RGB(0, 255, 0)
s.Fill.Solid
' Add label.
s.TextFrame.Characters.text = "Tuna"
s.TextFrame.AutoSize = True
End SubRead now
Unlock full access