Opening, refreshing, saving, and closing a closed workbook

I have a macro enables document that has links to a spreadsheet. I have written this code:

Private Sub Workbook_Open()

     Application.ScreenUpdating = False
     Application.DisplayAlerts = False
     Workbooks.Open FileName:= _
         "G:\Daily Operations Report\Executive\Automated Reports.xlsx", Password:="executive"
     Workbooks("Automated Reports.xlsx").RefreshAll
     ActiveWorkbook.Save
     ActiveWorkbook.Close
     Application.ScreenUpdating = True
     Application.DisplayAlerts = True

End Sub

and it is not refreshing the information in the spreadsheet...what am I doing wrong? It Keeps saying that an object is required but where?