Thread: Open Event
View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
  
Posts: 22,906
Default Open Event
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"

Reply With QuoteReply With Quote