Dim xlsBook As Workbook Set xlsBook = Workbooks.Open("C:\archivo.xls") 'Aquí el código para manejar los datos del libro xlsBook.Close Set xlsBook = Nothing