Steven usa Control de cambios en sus documentos todo el tiempo. Necesita una forma de contar solo las palabras que se han modificado en un documento: las afectadas por el control de cambios.

Si está utilizando una versión anterior de Word (anterior a Word 2003), hay una forma de hacerlo. En el cuadro Buscar, si presiona Ctrl + N, Word solo encontrará palabras «nuevas» …​ es decir, cambios registrados. A continuación, puede reemplazar estas «palabras» por sí mismas (use ^ & en el cuadro Reemplazar con) y obtener un recuento de los reemplazos.

Si utiliza Word 2003, esta capacidad ya no existe debido a los cambios en la forma en que Word realiza un seguimiento y muestra los cambios. En este caso, deberá utilizar una macro para mostrar la información deseada. El siguiente es un ejemplo de una macro que podría usar:

Sub GetTCStats()

Dim lInsertsWords As Long     Dim lInsertsChar As Long     Dim lDeletesWords As Long     Dim lDeletesChar As Long     Dim sTemp As String     Dim oRevision As Revision          lInsertsWords = 0     lInsertsChar = 0     lDeletesWords = 0     lDeletesChar = 0     For Each oRevision In ActiveDocument.Revisions         Select Case oRevision.Type             Case wdRevisionInsert                 lInsertsChar = lInsertsChar + Len(oRevision.Range.Text)

lInsertsWords = lInsertsWords + oRevision.Range.Words.Count             Case wdRevisionDelete                 lDeletesChar = lDeletesChar + Len(oRevision.Range.Text)

lDeletesWords = lDeletesWords + oRevision.Range.Words.Count         End Select     Next oRevision

sTemp = "Insertions" & vbCrLf     sTemp = sTemp & "    Words: " & lInsertsWords & vbCrLf     sTemp = sTemp & "    Characters: " & lInsertsChar & vbCrLf     sTemp = sTemp & "Deletions" & vbCrLf     sTemp = sTemp & "    Words: " & lDeletesWords & vbCrLf     sTemp = sTemp & "    Characters: " & lDeletesChar & vbCrLf     MsgBox sTemp End Sub

Esta macro recorre cada cambio en el documento actual y suma por separado el recuento de palabras y el recuento de caracteres para las inserciones y eliminaciones. A continuación, las estadísticas se presentan en un cuadro de mensaje. Tenga en cuenta que la macro examina la colección de palabras para cada cambio en el documento.

Debe comprender que el recuento de palabras, como se presenta aquí, es una aproximación. Esto se debe a la forma en que se cuentan las palabras. Por ejemplo, cada signo de puntuación en una adición se cuenta como una palabra separada. Esto significa que una frase como «como se puede ver, esta es una excelente manera» se contabilizaría como diez palabras en lugar de nueve (la coma cuenta como una palabra separada). Además, si la frase que agregó incluye un espacio inicial, lo que suele suceder con las inserciones, entonces se contabilizarían once palabras para la inserción debido a ese espacio.

_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 (1095) se aplica a Microsoft Word 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Word (Word 2007 y más tarde) aquí:

link: / wordribbon-Counting_Changed_Words [Contando palabras cambiadas].