Access y VBA - Exportar Tabla HTML e incluir en email

El problema que tengo al emplear este código es que al recibir el email enviado por CDO se visualiza el códido html, no el report bien formateado. Copio el post de Guarracuco:

"Un método que me sirvió por varios años, fué el de exportar el reporte a HTML; abrirlo, copiar su contenido; pegar este contenido en el body(CDO).

1)ABre un reporte oculto
                DoCmd.OpenReport stDocName, acViewPreview, , , acHidden

2)Lo exportas a formato HTML:
archivo = "c:\siscond\adjuntos\webtemp.HTML"
DoCmd.OutputTo acOutputReport, stDocName, acFormatHTML, archivo, False
3)Lo abres y copias el contenido HTML:
                NúmeroArchivo = FreeFile
                Set fs = CreateObject("Scripting.FileSystemObject")
                Set f = fs.GetFile(archivo)

                Set ts = f.OpenAsTextStream(1, -2)
                s = ts.readall
                ts.Close
La variable s contiene todo el código html del archivo. La asignas al body del objeto CDO y en el cuerpo del correo se mostrará la tabla.
Si se trata de enviar muchos es un poco lento.

pd: en la parte superior del procedimiento o form, declara
Dim NúmeroArchivo
Dim fs, f, ts"