Create a new workbooks for each Unique value

[JOEYSCLEE]

Hi, there
I posted the related thread before and it was solved as per below link.

http://www.vbaexpress.com/forum/showthread.php?58398-Create-a-new-sheet-workbook-for-all-Unique-values-(Including-Pictures-Images)

Nevertheless, the Headers are moved to fourth rows and the first, second & third rows need to be kept in the new worksheets & workbooks. Also, there are 2 more columns in the worksheet and the Header names are changed as well. Enclosed the Example 2 for your reference.

Hence, would you please help to write the code for copying all rows (including pictures / images) with the same value in the column H (the Header - Mill and Vdr) of the range to a new workbooks? Hope that the macro can do for every unique value in this column and it can populate the filename as the Mill and Vdr name as worksheet name.