Copy specific data from master worksheet to specific worksheet *VBA*

[T44RM4R]

Hi all. I have a basic understanding of Excel so please bare with me. I am trying to create a macro that will copy data from a master worksheet and paste it into a worksheet that corresponds with data ID (see example). I hope this makes sense,
Thank you

Master
[TABLE="width: 500"]
<tbody>[TR]
[TD]ID[/TD]
[TD]Value[/TD]
[TD]Description[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLG[/TD]
[TD]Green apple[/TD]
[/TR]
[TR]
[TD]z02[/TD]
[TD]BNANL[/TD]
[TD]Long banana[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLR[/TD]
[TD]Red apple[/TD]
[/TR]
[TR]
[TD]z02[/TD]
[TD]BNANS[/TD]
[TD]Short banana[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLC[/TD]
[TD]Cooking apple[/TD]
[/TR]
</tbody>[/TABLE]

Wksht - z01
[TABLE="width: 500"]
<tbody>[TR]
[TD]ID[/TD]
[TD]Value[/TD]
[TD]Description[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLG[/TD]
[TD]Green apple[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLR[/TD]
[TD]Red apple[/TD]
[/TR]
[TR]
[TD]z01[/TD]
[TD]APPLC[/TD]
[TD]Cooking apple[/TD]
[/TR]
</tbody>[/TABLE]

Wksht - z02
[TABLE="width: 500"]
<tbody>[TR]
[TD]ID[/TD]
[TD]Value[/TD]
[TD]Description[/TD]
[/TR]
[TR]
[TD]z02[/TD]
[TD]BNANL[/TD]
[TD]Long banana[/TD]
[/TR]
[TR]
[TD]z02[/TD]
[TD]BNANS[/TD]
[TD]Short banana[/TD]
[/TR]
</tbody>[/TABLE]

 

[ToniGo]

Something like this (untested)
Assume master sheet is called "Mastersheet"

sub CopyDataById
dim inSheet as string
dim inRow,outRow as long

for inrow = 1 to 10 '(or however many rows you have)
inSheet = sheets("Mastersheet").cells(inrow,1).value 'set target worksheet based on ID
outrow = sheets(inSheet).cells("a10000").end(xlup).row+1 'find next available row in target worksheet
sheets(insheet).cells(outrow,1).value = sheets("Mastersheet").cells(inrow,1).value
sheets(insheet).cells(outrow,2).value = sheets("Mastersheet").cells(inrow,2).value
sheets(insheet).cells(outrow,3).value = sheets("Mastersheet").cells(inrow,3).value
next inRow

end sub