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
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.