Microsoft Office Forums - View Single Post - Change object properties by clicking

Thread: Change object properties by clicking

View Single Post

Old

03-16-2012, 02:13 PM

JohnWilson JohnWilson is offline

JohnWilson is offline

JohnWilson uses Windows 7 64bit

Windows 7 64bit JohnWilson uses Office 2010 32bit

JohnWilson uses Office 2010 32bit

Office 2010 32bit

Programmer

Join Date: Nov 2008

Location: UK

Posts: 1,912

JohnWilson has a spectacular aura about

JohnWilson has a spectacular aura about

Default

This macro will change the fill of ANY shape clicked in show mode (assuming it can be changed)

Code:

Sub change_Color(oshp As Shape)
oshp.Fill.ForeColor.RGB = RGB(255, 0, 0)
End Sub

Reply With Quote