Método Document.Compare (Word)
Muestra las marcas de revisión para indicar dónde están las diferencias entre ambos documentos.
Sintaxis
expresión. Compare( _Name_ , _AuthorName_ , _CompareTarget_ , _DetectFormatChanges_ , _IgnoreAllComparisonWarnings_ , _AddToRecentFiles_ , _RemovePersonalInformation_ , _RemoveDateAndTime_ )
expresión requerida. Variable que representa un objeto Document.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Name | Obligatorio | String | Nombre del documento con el que se compara el documento especificado. |
| AuthorName | Opcional | Variant | Nombre del revisor asociado con las diferencias generadas en la comparación. Si no se especifica, se toma como valor predeterminado el nombre del autor del documento revisado o la cadena "Comparison" si no hay ninguna información sobre el autor. |
| CompareTarget | Opcional | Variant | El documento de destino para la comparación. Puede ser cualquier constante WdCompareTarget. |
| DetectFormatChanges | Opcional | Boolean | Es true (valor predeterminado) para que la comparación detecte también los cambios de formato. |
| IgnoreAllComparisonWarnings | Opcional | Variant | True compara los documentos sin notificar a un usuario de problemas. El valor predeterminado es False. |
| AddToRecentFiles | Opcional | Variant | True agrega el documento a la lista de archivos usados recientemente en el menú archivo. |
| RemovePersonalInformation | Opcional | Boolean | True quita toda la información de usuario de comentarios y revisiones y el cuadro de diálogo de propiedades en el objeto Document. El valor predeterminado es False. |
| RemoveDateAndTime | Opcional | Boolean | True quita la información de marca de fecha y hora de los cambios realizados en el objeto Document. El valor predeterminado es False. |
Ejemplo
En este ejemplo se compara el documento activo con el documento "FirstRev.doc" de la carpeta Draft y se colocan las diferencias encontradas en la comparación en un nuevo documento.
Sub CompareDocument()
ActiveDocument.Compare Name:="C:\Draft\FirstRev.doc", _
CompareTarget:=wdCompareTargetNew
End Sub
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.