Combine multi-columns into one signle column with open and close html <li>tag insertion

Hi All,

I need to combine around 20 columns into one single column, then I also need to insert open and close html tag for each column moved. See attachment example or information below

BULLET 1, BULLET 2, BULLET 3, BULLET 4, BULLET 5 ====> DESCRIPTION:

DESCRIPTION COLUMN
<ul>
<li>BULLET 1</li>
<li>BULLET 2</li>
<li>BULLET 3</li>
<li>BULLET 4</li>
<li>BULLET 5</li>
</ul>

Thank you very much for the big help

Hi
try this user-defined formula

Please Login or Register  to view this content.

to use it, copy the code into a module in the vba area, then and in a cell in your sheet type the formula
=concatenate_range(B6:U6)

this should return the contents of the specified range deparated as you indicated. You can then copy this like a normal formula to create a strong from other rows

Thank you very much, NickyC. Truly appreciated it....

Hi NickyC,

Just tested the form, everything works perfectly fine beside one small problem. The open html tag suppose to be <li> not </li>. Currently the open and close both showing </li>BULLET 1</li>, not <li>BULLET 1</li>

Correct way:
<ul>
<li>BULLET 1</li>
<li>BULLET 2</li>
<li>BULLET 3</li>
<li>BULLET 4</li>
<li>BULLET 5</li>
</ul>

Can you show me how to edit the code to make such change? Thanks

Hi
try this version:

Please Login or Register  to view this content.

Will do

Appreciated!!!

If txt <> "" Then txt = txt & "</li>" & "<li>" & CCell Else txt = txt & "<li>" & CCell

I switched to

If txt <> "" Then txt = txt & "<li>" & "</li>" & CCell Else txt = txt & "<li>" & CCell

IT'S WORKING AND WORKS LIKE A CHAMP, THANKS.