Next non-blank cell

I need a macro that will work through a range, find the first non-blank cell, put that cell's info in another cell, then continue from where it left off and find/record the next non-blank cell. And the next, and the next, until the range is completed. If A1 had "1" and A5 had "2" and A10 had "3" then record those ,say in C1:C3 "1", "2", and "3".
I can find the first cell, but can't continue where I left off to get the next.