Here is one I use to make a spilt line formula into one. I select the top
row of the 2-3 rows and execute. As written it must have a blank above and
below. I have assigned to a custom 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))
mstr = mstr & C
Next
Cells(x - 1, y) = mstr
End Sub
--
Don Guillett
SalesAid Software

"sajay" wrote in message
ups.com...
Hi all,
A1:data bill description
amt
A2:19-04-2006 IS/100 THIS IS THE NARRATION FIELD WHICH 100.00
A3: I WANT TO CHANGE
A4:19-04-2006 IS/100 THIS IS THE NARRATION FIELD WHICH 100.00
A5: I WANT TO CHANGE
A6:19-04-2006 IS/100 THIS IS THE NARRATION FIELD WHICH 100.00
A7: I WANT TO CHANGE
A8: THIS IS THIRD ROW

This is the list i get from a txt file
the problem is that i cannot sort this with
date/bill/amount/description

what i want is to get the description in one row so that i can sort all
items.



YOurs,
sajay