manipulating objects

  • Thread starter Thread starter ashburn
  • Start date Start date
A

ashburn

I need help to manipulate a rectangle I drew from
autoshape: If F6=20 then rect in C8 tilt 20 deg.
If F6=-20 then rect tilt -20 deg. Any help in this area
would be greatly appreciated.
Thanks in advance.
 
Ashburn,

Replace the Rectangle 1 with the name of the object that you want to rotate,
and the Sheet1 with the sheet name:

Sub RotateRectangle()
Worksheets("Sheet1").Shapes("Rectangle 1").Rotation = Range("F6").Value
End Sub

HTH,
Bernie
MS Excel MVP
 
Back
Top