Erreur méthode Add pour DocumentProperties
Bonjour
J'ai une macro de mise en forme de rapport en Excel généré par un autres logiciel.
Je tente de l'améliorer afin qu'elle ajoute des propriétés de documents personnalisés qui sont ensuite utilisé dans mes en-têtes. Pour l'instant, je crée manuellement ces propriétés.
J'ai ajouté le modèle de code suivant :
Code:
1
2
3
4
5
6
| With ActiveWorkbook.CustomDocumentProperties
.Add Name:="CLIENT", _
LinkToContent:=False, _
Type:=msoPropertyTypeString, _
Value:="Lorem Ipsum"
End With |
J'utilise "With" car j'ai plusieus "Add". Le modèle ci-haut est inspiré de l'exemple retrouvé dans l'aide de VisualBasic fournit avec le logiciel.
Lorsque que j'active ma macro, je reçois le message : "Erreur Automation" "Erreur non spécifié"
J'aimerais, svp, comprendre ce qui cause cette erreur. C'est aussi la première fois que je rencontre ce type d'erreur.
Système exploitation : Windows XP
Version Excel : 2003
------------------------------------------------------------------------
J'ai essayé avec la syntaxe suivante :
Code:
.Add "CLIENT", False, msoPropertyTypeString, "Lorem Ipsum"
pour obtenir ceci :
"Erreur d'exécution -2147467259 (80004005)':
La méthode "Add" de l'objet "DocumentProperties" a échoué.
--------------------------------------------------------------------------
