VBA: copy text from A based on serial number in B

[jaimond]

Based on column B data value, copy column A data in C and D column. Only highest no related sub-data will go in C column. Rest will go in D.

	A	B	C	D
BA Drom 10AB DRAG CAC ISO B3A PK 344 M	5.777327 3.479375 15.58231 5.201591 4.01268	CAC ISO	BA Drom, 10AB DRAG, B3A PK, 344 M
BA Drom 10AB DRAG kak1 ISO B3A PK 34M4 M	5.777327 3.479375 15.58231 15.58231 4.01268	kak1 ISO, B3A PK	BA Drom, 10AB DRAG, 34M4 M
BA Drom 10AB DRAG CAC ISO B3A PK 34M4 M	5.777327 3.479375 15.58231 5.201591 4.01268	CAC ISO	BA Drom, 10AB DRAG, B3A PK, 34M4 M

<colgroup><col style="width: 25pxpx"><col><col><col><col></colgroup><thead>
</thead><tbody>
[TD="align: center"]1[/TD]
[TD="align: center"]Title1[/TD]
[TD="align: center"]Title2[/TD]
[TD="align: center"]Title3 [Height][/TD]
[TD="align: center"]Title4[/TD]

[TD="align: center"]2
[/TD]

[TD="align: center"]3[/TD]

[TD="align: center"]4[/TD]

[TD="align: center"]5[/TD]

[TD="align: center"]6[/TD]

[TD="align: center"]7[/TD]

[TD="align: center"]8[/TD]

</tbody>

Sheet1​

 

[jaimond]

bump

 

[jaimond]

bump

 

[jaimond]

bump

 

[jaimond]

bump

 

[jaimond]

bump

 

[jaimond]

bump

 

[jaimond]

Bump