tomhaddock wrote:
*Hi

I have a floating control box solution.

Go to Visual Basic Editor and create a UserForm and a button on it
for each Sheet. (Lets name the UserForm frmSelectSheet)
In each button's OnClick Event type in:

Worksheets("SheetName").Activate

or if it a Chart sheet substitute 'Worksheets' with 'Charts'

Then double-click on 'ThisWorkBook' and select its OnOpen Event and
type in:

Load frmSelectSheet
frmSelectSheet.Show False

If you want you can prevent the floating control from being closed by
adding the following in the UserForm QueryClose Event:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)

If CloseMode < 1 Then Cancel = 1

End Sub

That's it!

Tom *

I'll try this Tom and keep you posted. Cheers mate.