MACRO to split data into multiple sheet

Closed
kittyluting22
Posts
1
Registration date
Monday June 26, 2017
Status
Member
Last seen
June 26, 2017
- Updated on Jun 26, 2017 at 11:37 AM
TrowaD
Posts
2888
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
August 16, 2022
- Jun 26, 2017 at 11:38 AM
I have a data sheet with below columns, would like a macro to split data into each tab according to cardholder_name if this is possible

Cardholder_Name Merchant Merchant_Location Date_Occurred Date_Posted Settlement_Amount

1 reply

TrowaD
Posts
2888
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
August 16, 2022
515
Jun 26, 2017 at 11:38 AM
Hi Kittyluting22,

See if the following code does as requested:

Sub RunMe()
For Each cell In Range("A2:A" & Range("A1").End(xlDown).Row)
    cell.EntireRow.Copy Sheets(cell.Value).Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
Next cell
End Sub


Best regards,
Trowa
0