You can use
ActiveSheet.Next.Select
ActiveSheet.Previous.Select
But test where you are because it blow if you you are in the last/first sheet
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"Esau" wrote in message ...
ActiveWindow.ActivateNext ----Is there a ActiveSheet.ActivateNext
--
Esau