Or use

Call macroname

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Gord Dibben" <gorddibbATshawDOTca wrote in message ...
Don't use Run

Simply..........

Private Sub Workbook_Open()
Application.ScreenUpdating = False
SortSheets1
SortSheets2

etc.


Gord Dibben MS Excel MVP

On Wed, 17 Sep 2008 08:19:22 -0700 (PDT), jlclyde
wrote:

Private Sub Workbook_Open()
Application.ScreenUpdating = False
Run "SortSheets1"
Run "SortSheets2"