How to Transfer data From one sheet to relevant sheets.

[Dilusha]

[TABLE="class: grid, width: 100"]
<tbody>[TR]
[TD]Cus_Code
[/TD]
[TD]Inv. No
[/TD]
[TD]Date
[/TD]
[TD]Rs
[/TD]
[/TR]
[TR]
[TD]CDD
[/TD]
[TD]V4525
[/TD]
[TD]21/8/2018
[/TD]
[TD]1525
[/TD]
[/TR]
[TR]
[TD]CDD
[/TD]
[TD]V4531
[/TD]
[TD]5/8/2018
[/TD]
[TD]1522
[/TD]
[/TR]
[TR]
[TD]CFF
[/TD]
[TD]V2547
[/TD]
[TD]11/8/2018
[/TD]
[TD]4522
[/TD]
[/TR]
[TR]
[TD]GHB
[/TD]
[TD]V1478
[/TD]
[TD]25/5/2018
[/TD]
[TD]3256
[/TD]
[/TR]
[TR]
[TD]GHB
[/TD]
[TD]V2358
[/TD]
[TD]31/8/2018
[/TD]
[TD]2563
[/TD]
[/TR]
</tbody>[/TABLE]

I have above table in sheet1(start from A1) and I have inserted sheets by name of Cus_code in same work book.
The inserted sheets have same table (starting A1). I want a macro to transfer data from sheet1 to relevant sheets.
Eg.
[TABLE="class: grid, width: 50"]
<tbody>[TR]
[TD]No
[/TD]
[TD]Inv.No
[/TD]
[TD]Date
[/TD]
[TD]Rs
[/TD]
[/TR]
[TR]
[TD]1
[/TD]
[TD]V1478
[/TD]
[TD]25/5/2018
[/TD]
[TD]3256
[/TD]
[/TR]
[TR]
[TD]2
[/TD]
[TD]V2358
[/TD]
[TD]31/8/2018
[/TD]
[TD]2563
[/TD]
[/TR]
</tbody>[/TABLE]

This Table should be created in sheet GHB .
Table headings already created.
But Serial No (I.e 1,2,3) Should be generated automatically.

I Use excel 2007
pls help me .