Méthode Document.Compare (Word)

Affiche des marques de révision qui indiquent en quoi le document spécifié diffère d'un autre document.

Syntaxe

expression. Compare( _Name_ , _AuthorName_ , _CompareTarget_ , _DetectFormatChanges_ , _IgnoreAllComparisonWarnings_ , _AddToRecentFiles_ , _RemovePersonalInformation_ , _RemoveDateAndTime_ )

expression Obligatoire. Variable qui représente un objet Document.

Parameters

Nom Requis/Facultatif Type de données Description
Name Obligatoire Chaîne Nom du document avec lequel vous comparez le document spécifié.
AuthorName Facultatif Variant Nom du réviseur associé aux différences générées par la comparaison. Si vous ne spécifiez pas cet argument, il prend, par défaut, le nom de l'auteur du document révisé ou, si cette information n'est pas disponible, la chaîne « Comparaison ».
CompareTarget Facultatif Variant Le document cible pour la comparaison. Peut être des constantes WdCompareTarget.
DetectFormatChanges Facultatif Booléen True : (par défaut) pour que la comparaison détecte les modifications de format.
IgnoreAllComparisonWarnings Facultatif Variant True pour comparer les documents sans notifier de problèmes à un utilisateur. La valeur par défaut est False.
AddToRecentFiles Facultatif Variant True ajoute le document à la liste des derniers fichiers utilisés dans le menu fichier.
RemovePersonalInformation Facultatif Booléen True supprime toutes les informations utilisateur des commentaires, révisions et de la boîte de dialogue Propriétés de l'objet Document renvoyé. La valeur par défaut est False.
RemoveDateAndTime Facultatif Booléen True supprime les informations de date et date et heure du suivi des modifications dans l'objet Document renvoyé. La valeur par défaut est False.

Exemple

Cet exemple montre comment comparer le document actif avec le document « FirstRev.doc » situé dans le dossier Draft, puis comment placer les différences générées par la comparaison dans un nouveau document.

Sub CompareDocument() 
 ActiveDocument.Compare Name:="C:\Draft\FirstRev.doc", _ 
 CompareTarget:=wdCompareTargetNew 
End Sub

Voir aussi

Objet Document

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.