Create Sheets based on unique values in Column

Hi all,

I would like to know if anyone knows how to add sheets based on entries of column D (Failure Reason). In sheet1 is the complete data and for each failure reason a sheet needs to be created for it. All those rows of data need to be copied into the corresponding sheet. I currently do this manually using auto filter. This can be quite time consuming. I was thinking of creating a template with all the sheets created, but the failure reason can change all the time. I've attached an example, sheet1 is how the data arrives and the other sheets I add manually.

Thanks