Efectivamente, no sé si desde Access hay alguna forma más simple, pero se podría hacer algo como esto:
Código vb:
Ver originalDim xlsApp As Object
Dim xlsBook As Object
Set xlsApp = CreateObject("Excel.Application") 'Crea una instancia de la aplicación Excel
Set xlsBook = xlsApp.WorkBooks.Open("C:\archivo.xls") 'Abre el libro especificado
TextBox1 = xlsBook.Worksheets("Hoja").Range("A1") 'Coloca en TextBox1 el valor de la celda A1 de la Hoja "Hoja"
xlsBook.Close 'Cierra el libro
Set xlsBook = Nothing 'Destruye el objeto
xlsApp.Quit 'Cierra la aplicación
Set xlsApp = Nothing 'Destruye el objeto