I said you would need a blank cell above and place the cursor on the top row
of what you are converting. Look at the macro and you will see that x is the
active row and x-1 is where the consolidation is placed. Hence the need for
a blank cell above the top line.....
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"PR" wrote in message
...
Sorry Don,

The code actually takes the cell below the empty cell...

Regards - paul

"Don Guillett" wrote in message
...
Here is one I designed sometime ago to consolidate formulas broken up by
email. You will need a blank row above and below the rows to consolidate.
Then place cursor on top row and fire macro. I have assigned to a button
on my toolbar.

Sub FixLongFormulas() 'goto a remote area of ws & select 1st line
x = ActiveCell.Row
y = ActiveCell.Column
z = ActiveCell.End(xlDown).Row
For Each C In Range(Cells(x, y), Cells(z, y))
'Cells(x - 1, y) = Cells(x - 1, y) & C
mstr = mstr & C
Next
Cells(x - 1, y) = mstr
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"PR" wrote in message
...
Is there a quick way of turning text that is on multiple rows into one
row, one problem that have with this, is that I have text say in 4-7
that I what all in row 4, then the next maybe row 8 & 9 into row 8, then
the next maybe row 12-14 into row 12 and so on. They is no pattern to
this...


Regards - Paul