Sub changeShapecolor()
ActiveSheet.Shapes("Rectangle 2").Fill.ForeColor.SchemeColor = 12’blue
End Sub
Don Guillett
SalesAid Software
dguille...@gmail.com
From: bhupendra singh raghav
Sent: Sunday, January 01, 2012 5:54 AM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$
Sub FillColor()
dim sh as shape
set sh= activeSheet.shapes("MyShape")
sh.fill.forecolor=rgb(255,0,0)
end Sub
On Sun, Jan 1, 2012 at 5:24 PM, bhupendra singh raghav <
raghav.bhupen...@gmail.com> wrote:
> Hi Group,
> Excel is not recording macro to work with shapes .How to fill Color in
> shapes b
Hi Group,
Excel is not recording macro to work with shapes .How to fill Color in
shapes by VBA
Regards
Raghav
--
FORUM RULES (934+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Proble