Below is my code which works fine. However, it requires the "Employee
Database.xls" file to already be open. How could I change my code so that it
is pulling this data from a closed "Employee Database.xls" file?

Sub UpdateCodeBook()
'
' Employees Macro
' Macro recorded 9/28/2004 by Shawn D. Crabtree
'
' Keyboard Shortcut: Ctrl+Shift+E


Sheets("Names").Columns("A:C").ClearContents
Windows("Employee Database.xls").Activate
Sheets("Library").Range("C:C,E:E,BE:BE").Copy
ActiveWindow.ActivateNext
Sheets("Names").Select
Range("A1").PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=False
Application.DisplayAlerts = False
Windows("Employee DataBase.xls").Close
Application.DisplayAlerts = True
Sheets("Names").Select
Range("A1").Select
End Sub



--
Thanks
Shawn