Hi Ken

For most things you don't have to select cell in your macro's
but you can use this in the last macro if you don't have hidden sheets.

Sub test()
With ThisWorkbook
.Worksheets.Select
Application.Goto Range("A1"), True
.Worksheets(1).Select
End With
End Sub




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



"KenL" wrote in message ...
I hope this is an easy one.
I have a lot of sheets in my workbook. I'm running alot of macros. when I
run the last macro I want all sheets to go back to position "A1".
is there an easy way to do this after it runs the last macro?
Thanks