Can you clarify your question a little bit please? Are you looking to move
the last piece of data (the data in the last cell) on each row? If so, where
did you want to move them... to a single column? Could there be any blank
rows in the data? Approximately how many rows (maximum) do you expect to be
doing this for (your answer will determine how complicated an approach to
take)?

--
Rick (MVP - Excel)


"AlanW" wrote in message
...
I have a worksheet with many rows, however, each of which is ended in
different column. For example, Row 1 ends in Column P, Row 2 ends in
Column
C, Row 3 ends in Column E and so on. How can I move or copy the data in
the
cell just before the blank cell using VB. Could someone help.

Thanks