Problem 1 :- Filter Data and paste to other sheet
Dear Sir / madam, Please see the attachment. I have a problem I want to copy data base on the Person name which i highlighted with yellow colour. suppose if the person name "JKM" a sheet will created with the name "JKM" and the entire rows data relating to Jkm WILL copy to the new sheets of JKM. if the person name is HM the the same rule will be follow. Attachment https://drive.google.com/file/d/0B2BJddV6HsaWUkxicUp0TlVxb1U/view?usp=sharing Sub Test() Dim J As Integer Dim sh As Worksheet Sheet1.Range("M:M").Copy Sheet1.Range("Z:Z") Sheet1.Range("Z:Z").RemoveDuplicates Columns:=1, Header:=xlNo 'Set sh = Worksheets For J = Sheet1.Range("Z" & Rows.Count).End(xlUp).Row To 3 Step -1 ActiveSheet.Range("A2:M" & Sheet1.Range("M" & Rows.Count).End(xlUp).Row).AutoFilter Field:=13, Criteria1:=Sheet1.Cells(J, 26) Sheet1.Range("A2:M" & Sheet1.Range(...