VB code Get 2 latest file names from Directory

Hi Leith :

Thanks a lot for all your help, I am hoping that your family is feeling better now from illness.
I have tried your work, however, this is what happens.
I have loaded 3 files with criteria set in Cell A15 to the assigned directory in K1 and folder L1.
Now when i click on the checkbox in cell I1, it gives error as in attached pic.
This error is module "Send_Email" :

 .Attachments.Add Files(n), 1, 1, Filename

Please check and let me if i am doing something wrong.
Thanks a bunch for all your help.
Riz