Second attempt!
Add this line to your Excel code:
'Run Code
oApp.Application.Run "Test_Message", strN, dteN
I previously assigned name and date to strN and dteN
Create a module in Access with the following code:
Function Test_Message(strName as string, dteStart as date)
MsgBox...