これは遅い?
:%s@<table\>.\{-}>\_.\{-}</table>@\=substitute(submatch(0), "\\n", "", "g")@