Dim xl As Object
'Do not specify a class type
Set xl = GetObject("C:\MyFiles\Earnings.xls")
When the code is executed, the application associated with the specified
extension starts, and the object in the specified file is activated without being
displayed.