Thomas tiene un documento grande que tiene elementos que deben eliminarse antes de publicar el documento para otros. Las partes del documento que deben eliminarse se seleccionaron y marcaron con un comentario que indica que debe eliminarse antes de su publicación. A Thomas le gustaría encontrar y reemplazar rápidamente todo el texto que se comentó de esta manera y eliminarlo.

Usando Buscar y reemplazar, todo lo que puede hacer es encontrar los comentarios. No ha encontrado una manera de averiguar si el comentario es un indicador de que el texto debe eliminarse, ni tampoco ha descubierto cómo eliminar el texto real del documento que estaba resaltado.

Esto parece una tarea bastante complicada, ya que implica muchos pasos. Necesita encontrar un comentario, debe mirar el cuerpo del comentario para ver si coincide con la redacción deseada, debe eliminar el texto comentado en el cuerpo del documento y luego debe eliminar el comentario en sí. Este es un trabajo para una macro.

Afortunadamente, todos los comentarios de un documento son accesibles a través del grupo Comentarios usando VBA. Puede recorrer cada uno de los comentarios y ver si contiene el «texto de activación» para indicar que el comentario (y el texto al que se refiere) debe eliminarse. En el siguiente ejemplo, si el texto del comentario contiene las palabras «eliminar esto» en cualquier lugar del comentario, esto sirve como disparador.

Sub DeleteCommentsBaseText()

Dim c As Comment For Each c In ActiveDocument.Comments     If LCase(Trim(c.Range.Text)) Like "delete this" Then         c.Scope.Delete         c.DeleteRecursively     End If Next c End Sub

Si las palabras desencadenantes están en el comentario, se elimina la propiedad Scope; es esta propiedad la que indica el texto del documento que se seleccionó cuando se creó el comentario. El método DeleteRecursively se utiliza para eliminar el comentario real. (El método DeleteRecursively se agregó en Word 2013. En versiones anteriores, debería usar el método Delete en su lugar).

Comprenda que cuando ejecuta la macro es muy rápido y los cambios no se pueden deshacer. Si desea, en cambio, un poco más de control sobre qué comentarios y texto se eliminan, es posible que desee reconsiderar su flujo de trabajo. Si usa Control de cambios, quien coloque el comentario también podría marcar el texto del documento para su eliminación. Luego, antes de finalizar el documento, puede desactivar Control de cambios y revisar cada cambio para determinar si debe aceptarse o no. No es tan rápido como la macro anterior, pero le brinda un mayor control.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de texto más popular del mundo). Este consejo (2490) se aplica a Microsoft Word 2007, 2010, 2013, 2016, 2019 y Word en Office 365.