چک کردن وجود table و import کردنtable

[karmand]

Set ap = Application.FileSearch
ap.filename = namefile
If ap.Execute = 0 Then