none
Otra Ayuda con Microsoft Word RRS feed

  • Pregunta

  • Saludos,

     

    Tengo un documento cuya versión original no fue desarrollada por mi que tiene un texto oculto que comienza por  {TC ¨""Texto"}

    ¿Puede alguien ayudarme como eliminar dicho texto. ¿Qué es exáctamente?.

     

    Gracias de antemano,

    SA

    <!-- /* Font Definitions */ @font-face {font-family:"Palatino Linotype"; panose-1:2 4 5 2 5 5 5 3 3 4; mso-font-charset:0; mso-generic-font-family:roman; mso-font-pitch:variable; mso-font-signature:-536870009 1073741843 0 0 415 0;} @font-face {font-family:"Microsoft Sans Serif"; panose-1:2 11 6 4 2 2 2 2 2 4; mso-font-charset:0; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:1627421663 -2147483648 8 0 66047 0;} @font-face {font-family:Calibri; mso-font-alt:"Century Gothic"; mso-font-charset:0; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:-1610611985 1073750139 0 0 159 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin-top:3.0pt; margin-right:0cm; margin-bottom:0cm; margin-left:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:Calibri; mso-fareast-font-family:"Times New Roman"; mso-bidi-font-family:"Times New Roman"; mso-bidi-language:EN-US;} @page Section1 {size:612.0pt 792.0pt; margin:72.0pt 90.0pt 72.0pt 90.0pt; mso-header-margin:36.0pt; mso-footer-margin:36.0pt; mso-paper-source:0;} div.Section1 {page:Section1;} --> <!-- /* Font Definitions */ @font-face {font-family:"Palatino Linotype"; panose-1:2 4 5 2 5 5 5 3 3 4; mso-font-charset:0; mso-generic-font-family:roman; mso-font-pitch:variable; mso-font-signature:-536870009 1073741843 0 0 415 0;} @font-face {font-family:"Microsoft Sans Serif"; panose-1:2 11 6 4 2 2 2 2 2 4; mso-font-charset:0; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:1627421663 -2147483648 8 0 66047 0;} @font-face {font-family:Calibri; mso-font-alt:"Century Gothic"; mso-font-charset:0; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:-1610611985 1073750139 0 0 159 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin-top:3.0pt; margin-right:0cm; margin-bottom:0cm; margin-left:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:Calibri; mso-fareast-font-family:"Times New Roman"; mso-bidi-font-family:"Times New Roman"; mso-bidi-language:EN-US;} @page Section1 {size:612.0pt 792.0pt; margin:72.0pt 90.0pt 72.0pt 90.0pt; mso-header-margin:36.0pt; mso-footer-margin:36.0pt; mso-paper-source:0;} div.Section1 {page:Section1;} -->

    domingo, 25 de abril de 2010 13:19

Respuestas

  • Hola:

    Esos campos se utilizan para crear lo que se conoce como tabla de contenido de un documento de Word. Si los borras pierdes la tabla de contenido. Si aún así quieres borrarlos puedes probar con esta macro, previa copia de seguridad del documento (por si acaso):

    Sub Test()
    Dim oFld As Field
    For Each oFld In ActiveDocument.Range.Fields
    If oFld.Type = wdFieldTOCEntry Then
    oFld.Delete
    End If
    Next
    End Sub


    Saludos. Aprendiendo siempre cada día
    • Marcado como respuesta Uriel Almendra miércoles, 17 de abril de 2013 17:57
    domingo, 25 de abril de 2010 18:29

Todas las respuestas

  • PD:

    Existen muchos textos similares a lo largo de todo el documento y estamos trabajando con un documento de casi 2000 páginas. El texto solo es visible cuando se activa la opción "Mostrar u Ocultar". Yo se que ciertos caracteres especiales se pueden ubicar con ^ seguido de una secuencia que lo identifica. La llave a la que hago referencia no se muy bien que significa.

    Estamo trabajando con Word 2003

     

    Gracias de antemano,

    SA

     

    domingo, 25 de abril de 2010 14:46
  • Hola:

    Esos campos se utilizan para crear lo que se conoce como tabla de contenido de un documento de Word. Si los borras pierdes la tabla de contenido. Si aún así quieres borrarlos puedes probar con esta macro, previa copia de seguridad del documento (por si acaso):

    Sub Test()
    Dim oFld As Field
    For Each oFld In ActiveDocument.Range.Fields
    If oFld.Type = wdFieldTOCEntry Then
    oFld.Delete
    End If
    Next
    End Sub


    Saludos. Aprendiendo siempre cada día
    • Marcado como respuesta Uriel Almendra miércoles, 17 de abril de 2013 17:57
    domingo, 25 de abril de 2010 18:29
  • Gracias nuevamente.
    lunes, 26 de abril de 2010 23:34