Programa

Te pongo un ejemplo de código que lee una tabla de la bbdd y escribe los resultado en un documento excel.
Dim Cn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim xl As New Excel.Application
Dim w As Worksheet
Dim f As Long, c As Long
Cn.Provider = "Microsoft.Jet.OLEDB.4.0"
Cn.CursorLocation = adUseClient
Cn.Mode = adModeWrite
Cn.Open App.Path & "\bbdd.mdb", "admin", ""
Set Rs = Cn.Execute("Select * From PARAMETROS")
Set xl = CreateObject("Excel.Application")
xl.Application.Workbooks.Add
xl.Application.Workbooks.Open App.Path & "\informe.xls"
'xl.Visible = True
xl.Visible = False
Set w = xl.Worksheets.item("Hoja1")
w.Activate
f = 0
While Not Rs.EOF
For c = 0 To Rs.Fields.Count - 1
w.Cells(f + 1, c + 1) = Rs.Fields(c).Value
Next c
f = f + 1
Rs.MoveNext
Wend
' w.Range("A1", "B2").HorizontalAlignment = xlHAlignLeft
' w.Range("C1", "D2").HorizontalAlignment = xlHAlignCenter
' w.Range("E1", "F2").HorizontalAlignment = xlHAlignRight
'ActiveWindow.SelectedSheets.PrintOut (True)
xl.ActiveWorkbook.SaveAs App.Path & "\exportado.xls"
xl.Workbooks.Close
xl.Application.Quit
Set xl = Nothing
Rs.Close
Set Rs = Nothing
Cn. Close
El caso contrario (de Excel a bbdd) es muy similar, no creo que tengas problemas para hacerlo por ti misma después de lo anterior.