copy data to other sheets based on cell value

  • Hi, i am trying to sort and apply data to different users. I have over 300 users, where i need to sort the data and apply them into their sheet with Names, num bers address etc. I have made a small script that creates a sheet for each person with their names. B ut i have no clue to how i sort on names, and add the data belonging to each person. The sorting should be based on the names in the cells ex: B2 to G2. I know how to copy using the simple:

    1. Sheets("Ark1").Range("A2:G2").Copy Destination:=Sheets("Sheet2").Range("A1")

    Link to file: