By: Barry

Hi. So far so good - helped a lot. However I wish to place small rectangles at each of the 12 positions on a clock-face. Each shape will be placed at an angle of 30 deg. more than its neighbour. I have found how to do this by increment but how would I do it with an absolute placement. i.e. regardless of the angle the shape is placed at the start i need something like: With ActiveSheet.Shapes("Rect1") .Left = 410 .Top = 110 .AbsoluteAngle = 30 'degrees This would tilt rectangle to the 'one-o-clock' position. End With Any help will be much apreciated. B