如何调用Excel函数并发送参数

Question

我想调用访问函数并从excel发送参数 有我的访问功能

{
Function Macro1(source As String)

    DoCmd.TransferSpreadsheet acImport, 10, "Table1", source, True, ""

End Function
}

如何调用此函数？