OVH Cloud OVH Cloud

Propriété liée au contenu d'un signet

2 réponses
Avatar
arbiel
Bonjour à tous

Je voudrais définir automatiquement (par macro) des propriétés utilisateurs
en les liant "par contenu" à des signets.

J'ai demandé à Word (Word 2000, 9.0.3821 SR-1) d'enregistrer automatiquement
une macro en faisant la manipuliation à la main. Malheureusement, Word n'a
absolument rien introduit dans la macro.

J'ai alors écrit le code suivant :

With ActiveDocument.CustomDocumentProperties
.Add Name:="Signet", _
LinkToContent:=True, _
LinkSource:=ActiveDocument.Bookmarks("Signet").Name
End With

et j'ai obtenu une erreut d'exécution

Appel de procédure ou argument incorrect (erreur 5)

J'ai vérifié que le signet "Signet" existe.

Quelqu'un peut-il m'éclairer sur la manière de faire.

D'avance, merci

2 réponses

Avatar
Anacoluthe
Bonjour !

'arbiel' nous a écrit ...
Je voudrais définir automatiquement (par macro) des propriétés utilisateurs
en les liant "par contenu" à des signets.
J'ai alors écrit le code suivant :
With ActiveDocument.CustomDocumentProperties
.Add Name:="Signet", _
LinkToContent:=True, _
LinkSource:¬tiveDocument.Bookmarks("Signet").Name
End With


À première vue il manque le type de propriété, With est inutile
pour une seule instruction et la linksource semble bien compliquée :

ActiveDocument.CustomDocumentProperties.Add Name:="Signet", _
LinkToContent:=True, _
Type:=msoPropertyTypeString, _
LinkSource:="Signet"

Anacoluthe
« L'esprit de propriété double la force de l'homme. »
- VOLTAIRE

Avatar
arbiel
Merci beaucoup pour ces informations.

A la relecture, il me semble aussi qu'il manque les "." devant LinkToContent
et LinkSource;

Mais ce qui m'a beaucoup surpris, c'est l'absence de création automatique de
la macro à partir des actions entreprises sous Word.

On note le même comportement d'Excel : pas de création automatique de la
macro.

Je vous tiens informé du résultat dès que j'ai le temps de tester.

Et encore merci pour votre aide

Arbiel


Bonjour !

'arbiel' nous a écrit ...
Je voudrais définir automatiquement (par macro) des propriétés utilisateurs
en les liant "par contenu" à des signets.
J'ai alors écrit le code suivant :
With ActiveDocument.CustomDocumentProperties
.Add Name:="Signet", _
LinkToContent:=True, _
LinkSource:¬tiveDocument.Bookmarks("Signet").Name
End With


À première vue il manque le type de propriété, With est inutile
pour une seule instruction et la linksource semble bien compliquée :

ActiveDocument.CustomDocumentProperties.Add Name:="Signet", _
LinkToContent:=True, _
Type:=msoPropertyTypeString, _
LinkSource:="Signet"

Anacoluthe
« L'esprit de propriété double la force de l'homme. »
- VOLTAIRE