Push data from one sheet to another if date is found in column, then offset by 4 rows

Question

I have a workbook where a command button (submit personnel) event on sh1 prompts an inputbox asking for a date. When the date is entered it searches sh for the date. If th