Hi

I have just created a menu on a sheet at the front of my workbook. I have
made it appear first and I have just added a button and copied it 44 times
to the sheet.

The only way I know to get them all lined up on the sheet is to change each
ones individual properties.

Can someone tell me how I would get a load of controls on the sheet to line
up?

Thanks.
Rob

Rob,

Do you mean you want to move some buttons?

Sub MoveButtons()
Dim btn As Object
Dim i As Long

For Each btn In ActiveSheet.Buttons
btn.Left = 100
i = i + 1
btn.Top = i * 40
Next btn
End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Robert Hargreaves" wrote in message
...
Hi

I have just created a menu on a sheet at the front of my workbook. I have
made it appear first and I have just added a button and copied it 44 times
to the sheet.

The only way I know to get them all lined up on the sheet is to change
each
ones individual properties.

Can someone tell me how I would get a load of controls on the sheet to
line
up?

Thanks.
Rob

1) Make sure the Drawing toolbar is visible.
2) Select the Controls/Shapes you want to align
3) DrawingToolbarDrawAlignOrDistribute (pick 1 of 8 possible choices)

HTH,
--
George Nicholson

Remove 'Junk' from return address.


"Robert Hargreaves" wrote in message
...
Hi

I have just created a menu on a sheet at the front of my workbook. I have
made it appear first and I have just added a button and copied it 44 times
to the sheet.

The only way I know to get them all lined up on the sheet is to change
each ones individual properties.

Can someone tell me how I would get a load of controls on the sheet to
line up?

Thanks.
Rob