There might be vertical bars in the text. Actually, using [Ctrl]+F and using Find All, B178, B200 and B212 each contain vertical bars. Safer to use non-glyph characters, e.g., CHAR(8) or CHAR(127).

Next, there are no CHAR(13) not followed by CHAR(10) in B2:B244.

Standard approach when there's something like TRIM,

Formula: copy to clipboard 
=SUBSTITUTE(SUBSTITUTE(TRIM(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),"")," ",CHAR(8)),CHAR(10)," "))," ",CHAR(10)),CHAR(8)," ")


That assumes there should be no empty text lines between paragraphs. If there should be an empty line between paragraphs,

Formula: copy to clipboard 
=SUBSTITUTE(SUBSTITUTE(TRIM(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),"")," ",CHAR(8)),CHAR(10)," "))," ",CHAR(10)&CHAR(10)),CHAR(8)," ")


To be honest, this is something Google Sheets handles so much better than Excel that it may be worthwhile to perform this edit in Google Sheets. Here's a link to a copy of the OP's file in Google Drive. The cells in B2:B244 are modified as needed in D2:D244. The formula I used is a far more compact

Formula: copy to clipboard 
=REGEXREPLACE(B2,"(\r?\n)+",rept(char(10),2))