Ron
guess what all my sheets are hidden
(tools - options - uncheck sheet tabs)

by the way yesterday you helped me with enail. thanks. I sent you a follow
up quesiotn that
iwhen I email the graph it keeps the links to my workbook, is there a way to
turn the de-link the sheet that is created during the email process?
Thanks
Ken
"Ron de Bruin" wrote:

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