Thread: Open a workbook
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Virginia Virginia is offline
external usenet poster
 
Posts: 14
Default Open a workbook

I have this code in a workbook called "MAINWORKBOOK.XLS that opens another
excel file called "Ledger.xls". the code does one thing, add a new worksheet
to ledgers.xls.

Sub AddLedger()
Application.ScreenUpdating = False
Workbooks.Open Filename:=ThisWorkbook.Path & "\Ledger.xls"
With ActiveWorkbook
.Sheets.Add
End With
ActiveWindow.Visible = False
Workbooks("MAINWORKBOOK.XLS").Activate
Application.ScreenUpdating = True
End Sub

AS you can see the code opens the workbook, then hides it. is there any way
other than this to have it open the workbook already hidden so you do not see
a little blip on the windows bar at the bottom of the screen? thank you in
advance.