transferFromExcel("TmpTablo",yol,"Sayfa1","A1","E")  

cümlesi ile 

Function transferFromExcel(accessTableName As String, _
                            excelFullName As String, _
                            sheetName As String, _
                            startCell As String, _
                            finishCell As String)
                           
    DoCmd.TransferSpreadsheet TransferType:=acLink, _
                          TableName:=accessTableName, _
                          SpreadsheetType:=10, _
                          FileName:=excelFullName, _
                          HasfieldNames:=True, _
                          Range:=sheetName & "$" & startCell & ":" & finishCell
End Function


fonksiyonunu çağırsam geriye ne dönmesi lazım