Cut and paste macro

[khyskell]

I need a macro that will cut the data in a specific range of cells in
a column and paste it to the column immediately to the right of the
last column containing data. I have been able to accomplish the cut
and paste bit but it is pasted over the last column of data rather
than being next to it. I can't simply specify the range of cells
because this needs to be able to grow, so that it would continue to
paste NEXT to, on the right of, the last column of data, regardless of
how many columns there may be. Please help!! I'm kind of in a hurry!!

 

[Don Guillett]

Details and your code and examples of before/after. something like this
mc="c"
lc=cells(myrow,columns.count).end(xltoleft).column+1
range("c:???").cut range("c"&lc)