Auto Copy values in case of zero values without using VBA or macro

[Work_Sheet]

Is there a command to copy values and update the destination range in case the values changes? Like I have a list of items that i sell everyday. Now not all of it are sold everyday, sometimes some of the items only in the list. What I what is something that will automatically copy the items that was sold and skip those items that did not sell. I know that the filter button can be handy but I need something that will be used as a sales tracker or something. But I don't need to run or click vba's. I need something that runs and update automatically whenever there is change in the sales. But in case an item is zero or did not sell on a particular day, the next item will follow the last and there should not be any space in between.

Can somebody help? Thanks....

SOURCE		DESTINATION
CODE	NAME	SOLD		CODE	NAME	SOLD
10001	Platter	13		10001	Platter	13
10002	Shrimp	3		10002	Shrimp	3
10003	CHK Wing	4		10003	CHK Wing	4
10005	Quesadilla	7		10005	Quesadilla	7
10006	Chees Stck	0		10007	Chees Fri	5
10007	Chees Fri	5		80006	DynamitShri	23
80006	DynamitShri	23		80009	Mushrooms	2
80009	Mushrooms	2

<tbody>
</tbody>

 

[wideboydixon]

The generally accepted method is something like this:

Book1
	A	B	C	D	E	F
1	SOURCE			DESTINATION
2	CODE	NAME	SOLD	CODE	NAME	SOLD
3	10001	Platter	13	10001	Platter	13
4	10002	Shrimp	3	10002	Shrimp	3
5	10003	CHK Wing	4	10003	CHK Wing	4
6	10005	Quesadilla	7	10005	Quesadilla	7
7	10006	Chees Stck	0	10007	Chees Fri	5
8	10007	Chees Fri	5	80006	DynamitShri	23
9	80006	DynamitShri	23	80009	Mushrooms	2
10	80009	Mushrooms	2
Sheet1

Cell Formulas
Range	Formula
D3	{=IFERROR(INDEX(A$3:A$10,SMALL(IF($C$3:$C$10>0,ROW($C$3:$C$10)-ROW($C$3)+1),ROWS(D$3:D3))),"")}
E3	{=IFERROR(INDEX(B$3:B$10,SMALL(IF($C$3:$C$10>0,ROW($C$3:$C$10)-ROW($C$3)+1),ROWS(E$3:E3))),"")}
F3	{=IFERROR(INDEX(C$3:C$10,SMALL(IF($C$3:$C$10>0,ROW($C$3:$C$10)-ROW($C$3)+1),ROWS(F$3:F3))),"")}
Press CTRL+SHIFT+ENTER to enter array formulas.

WBD