Keep workbooks hidden when opening

[doggo]

I am trying to run a process in a workbook that involves opening several workbooks, getting some data from each workbook then closing and repeating until all files data has been retreived.

This is working well apart from the workbook is temporarily displayed in the task bar when it is opened. Here is my code:

dim wbSource as Workbook

              For i = 1 to 5
                     Application.ScreenUpdating = False
                     Application.EnableEvents = False
                     Set wbSource = Workbooks.Open(Filename:=strFile, UpdateLinks:=False, ReadOnly:=True)
                     Application.EnableEvents = True
                     wbSource.Windows(1).Visible = False

              next i

I have also tried using application.ShowWindowsInTaskbar = False but I still get an annoying flicker in the taskbar pane for excel. I know it's not a maasive problem but it would be nice for it to look professional[/code]