copy rows from a main sheet to 17 new created different sheets

Hello,
i am a new user and i wished the kind support of other members. i had a main excel worksheet named (recap) of about 1000 rows and i want to dispatch these rows among 17 new sheets depending on the value of the fifth column (E) so what I need exactly is a vba subfunction function that will check the value out of 17 value (Alger, Ain defla, T.O,Boumerdas,Bouira,Msila, Medea,Tipaza,Blida…..)And every time it will create a new worksheet with the same name in this column and paste the row in this new worksheet (of course the creation of the new corresponding sheet will be only the first time but after the function should only paste the row direct in the sheet created before)
To summarize the function will create 17 new worksheets and will copy the rows depending on the fifth column value to the corresponding sheets.

note: i attached the file that i need to make the action on it.

Thanks for your help,