HELP!! ARRANGE MULTIPLE ROWS IN A SINGLE ROW

[sajay]

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

 

[Don Guillett]

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

 

[sajay]

thanks don
I will try this and revert to you.
was busy with accounts so late to check groups


YOurs
sajay

 

[Don Guillett]

try this to fill in the blanks and then sort by that. If date is col A then
chnage this to add a column B chg to C and ,1 change to ,2

Sub fillinblanks()
For i = 2 To Cells(Rows.Count, "B").End(xlUp).Row
If Cells(i, 1) = "" Then Cells(i, 1) = Cells(i - 1, 1)
Next i
End Sub

 

[sajay]

don

things are getting complex, i fear

I don't understand what this code do.
I think i should send you one file and the output file.

Actually there are 5 fields viz DATE:BILLESCRIPTION:AMOUNT:AMOUNT
for occurance of date I want the narration field togater (ie in one
row)


YOurs
sajay