Concatenate cells and add text

[Rick_Stanich]

I cant quite get this, I have 4 cells in one row (a selection and can be any row), I need to string the values together and add some simple text.
Example:
Assume row 1 and columns A, B, C, D.

496 | 6d7 | Minor | Ø.375 +/-.010

What I need this to read as one long string:

#496, 6d7, Minor, Ø.375 +/-.010

Adding the text in Red.

Column A may be a single digit or up to 10 digits in length.
Once the string is configured I want to copy it and manually paste in another application. If the string is placed any where else in the worksheet for formatting, it can be deleted after the copy/paste or macro end.

As always, help is appreciated.

[Leith Ross]

Hello Rick,

This macro will take the active cell and the next three cells to right of it and add the "#,,," text in red, to the cell below the active cell. Using your example, if you select A1 then the macro will concatenate B1, C1, and D1, add the text, color it, and save the result in A2. You can change the macro to save it anywhere you like.

Please Login or Register  to view this content.

[Rick_Stanich]

Thank you Leith, this should get me going just fine

[suhas.nehete]

Rick
You can do this without using macro also.
just put this forumula in D1

Please Login or Register  to view this content.

and this formula will result into required ans you are looking for

Suhas

[Rick_Stanich]

Thank you Suhas