View Single Post
  #16   Report Post  
Posted to microsoft.public.excel,microsoft.public.excel.misc,microsoft.public.excel.worksheet.functions
Don Guillett Don Guillett is offline
external usenet poster
 
Posts: 10,124
Default Multiple Rows Into One


Your data was NOT laid out as it appeared on these posts. You have it
showing one line under the other when in fact it was in the next column.
GEEZ
Sheffield Stadium The Global Windows Queen Mother Memorial Cup
Heats

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"PR" wrote in message
...
Don,
Yes I have done what you have said, a blank row above and below...

Regards - Paul

"Don Guillett" wrote in message
...

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