Hi Choice,

Try:

Range("B1").Value = Range("A21").End(xlUp).Value


---
Regards,
Norman



"choice" wrote in message
...
i have a list (a1:a20) where one cell in that row will have a value...all
the
others will be blank. i need to have whatever cell has a value, to be
inputted into B1.
im thinking that i need a loop function, but im not too familiar with it

Thank you