Pasar Access a excel mediante VB

Se hace con el objeto excel. Application, te pongo aquí un poco lo que necesitas para que puedas profundizar más en el tema tu mismo. El tema de sacar la información de access no te lo pongo por que es trivial
Crear los objetos excel ->
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Add
Llenar un rango de columnas->
Set oSheet = oBook.Worksheets(1)
oSheet.Range("A1:E1").Value = Array("A", "B", "C", "D", "E")
Grabar el fichero excel->
OBook. SaveAs "nombrefichero"
Acabar->
OExcel. Quit
Si no tienes ninguna pregunta más, cierra y valora la pregunta.