ник: Explorer
public function trfsr(strfilename as string)
docmd.transferspreadsheet acimport, 8, "tbldocuments", strfilename, true, ""
end function
|
где
strfilename путь к файлу и его имя (то, что в вашем скриншоте отображается в поле на форме поиска)
просто передавайте и путь и имя >>> этой функции в качестве аргумента