Por cierto, ¿has notado que todo este bloque no tiene sentido?:
Código vb:
Ver original"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) & _
"', Mixto = '" & Text1(13) &
Estás haciendo nueve veces la misma asignación del mismo dato al mismo campo.
Creo que algo está mal.