Copying Non Blank Cells Between Worksheets

i have 2 worksheets. Worksheet A has 100 rows on it with information in the first column. However, there are many blank rows e.g

Column A
1
2 matt
3
4 simon
5 paul
6
7
8 mike
9
10
11
12 john

what i need to do is transfer this to worksheet B without copying accross the blank cells, Now the main problem is i want the cells to be linked so i need a formula that finds the next cell with data in it to go in the next cell down. So worksheet B will look like this:-

Column A
1 Matt
2 Simon
3 Paul
4 Mike
5 John