Unique, random selections from one sheet to another

Good day all,

I'm using Excel 2007 at work and am having issues with my current macro. The first one should be a simple fix, I hope. The macro creates two sheets in a workbook. The length of sheet1, 'checklog,' varies based on the total items imported. I need to have cell D2 be the total of blanks and dates over one year old based on Column E.

Second, on sheet2: I need to either select a random sample, from sheet1, of IN USE items (column D) equaling 5% of the the total inventory. Or, 100% of the blanks and over one year old items, whichever will give the larger sampling. These need to populate sheet2 starting in cell A5

Third, I'd like to have the items imported from above be numbered in column A

With the attachments:
Checklog.txt will import with 12 total items. One is over a year old and three have missing dates. The checklog tab cell D2 counts only 1, but I need it to have 4.

Thank you so much for your help. I've been struggling with this for days.