does not work with line-breaks in cell

[SVallant]

i solved this by replacing the vbLF through

            cellValue = cell.Value
            cellValue = Replace(cellValue, vbLf, "<br>")
            currentLine = currentLine & cellValue ' cell.Value

Thank you very much for sharing the code

[aslmx]

I also came across this issue. As it hasn been updated i forked this project and added this as well as putting the result immediately into the clipboard.

[dreamflasher]

@aslmx can you create a PR?