I would like to assign a macro to a forms button that, when clicked,
it will take me to a specific cell on a sheet called Invoices. I would
however like the cell that to which it takes me to be positioned in
the top left position on the sheet when I get there. If it helps I
have named each of the cells that i want the buttons to take me to.
the first button should take me to the named range "week1" and so on.
Any help with this would be appreciated. I know its a simple thing but
I cant get my head around this for some reason.

TIA
Dave

Use a macro with this line

Application.Goto Sheets("Invoices").Range("G20"), True


--
Regards Ron de Bruin
http://www.rondebruin.nl


"JazzBlues" wrote in message ...
I would like to assign a macro to a forms button that, when clicked,
it will take me to a specific cell on a sheet called Invoices. I would
however like the cell that to which it takes me to be positioned in
the top left position on the sheet when I get there. If it helps I
have named each of the cells that i want the buttons to take me to.
the first button should take me to the named range "week1" and so on.
Any help with this would be appreciated. I know its a simple thing but
I cant get my head around this for some reason.

TIA
Dave

In the macro assigned to the button:

Application.GoTo Destination:=Range("Week1"),Scroll:=True

Such code should be in a general module, not a sheet or the ThisWorkbook
module.
--
Regards,
Tom Ogilvy



"JazzBlues" wrote in message
...
I would like to assign a macro to a forms button that, when clicked,
it will take me to a specific cell on a sheet called Invoices. I would
however like the cell that to which it takes me to be positioned in
the top left position on the sheet when I get there. If it helps I
have named each of the cells that i want the buttons to take me to.
the first button should take me to the named range "week1" and so on.
Any help with this would be appreciated. I know its a simple thing but
I cant get my head around this for some reason.

TIA
Dave

Thanks Ron That worked like a charm
Dave


On Sun, 23 Oct 2005 23:32:19 +0200, "Ron de Bruin"
wrote:

Use a macro with this line

Application.Goto Sheets("Invoices").Range("G20"), True