How to delete one row in a string?

[dschmitt]

I have column headers that are generated by an analytical bio-assay machine.
Some of the header cells have 2 rows. The first row contains the title and the second row contains a measurement unit.
See columns C and E in screenshot below.

Capture.PNG

The content and the number of characters in the first row and in the second row is variable.

Is there a way to copy only the first row into a new cell?

In the screenshot below is shown how I want the column C and E header cells to look like.

Capture2.PNG

[kersplash]

Can you attach a small sample of your data with the headers as you get raw?

Go Advanced -> Manage Attachments -> Upload

[jindon]

Ctrl + H (Find & Replace)
Enter Alt + 0010 (0010 must be entered from number key pad) followed by an asterisk *

[dschmitt]

I attached an example file.

[dschmitt]

jindon, I need a VBA solution. This is just a small piece in a larger VBA

[kersplash]

I attached an example file.

I thought you might provide some more rows of data so we could help with more than just the first row. Don't you want to keep the data from the header cells too?

[jindon]

You could record it...

Please Login or Register  to view this content.

[dschmitt]

I have everything else under control. The only thing I need help with is in removing the second row in the string.
I wonder whether the string contains a carriage return that could be used to delete the second row.

[dschmitt]

jindon, great, thank you. That works. My hunch about the carriage return was right. But I did not know how to do it. Now that I see it it is obvious.

One last question. What is the 2 for at the end of the replace function?

[jindon]

2 is for xlPart, 1 for xlWhole.

[dschmitt]

I see. I did not know that. Well thanks again. I learned something new today!

[jindon]

You are welcome and thanks for the rep.