Yo man,
i dont know about the VB code, but its fairly simple to convert a access table to excel format. you just need to go to the macors and write a new one using the function
OutputTo
in the window near the foot note selecte these options
object type - Table
object name - <name of the table...