Excel 2013 :: Eliminating Blank Cells In Range In Row?

I am using windows 7 64bit sp1 and excel 2010 32bit sp1

I am trying to fix this formula (it takes a range in a unique column, and multiple row:

Code:
=IFERROR(INDEX($B$1:$B$6,SMALL((IF(LEN($B$1:$B$6),ROW(INDIRECT("1:"&ROWS($B$1:$B$6))))),ROW(A1)),1),"")
from here

I want to make it work on my array in a row, like this: (i need to remove the blank cells and the output have to be still in a row)

value1
empty cell
empty cell
value 2
value 3
empty cell
output:
value1
value2
value3

I need a function becouse I have dynamic table with something like 10k rows and 50 columns.