Discussion :

[PaulR]

sous VBA, le code suivant fonctionne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   MsgBox ActiveWorkbook.BuiltinDocumentProperties.Item(1).Name

Sous Delphi, l'automation me pose problème. Le code suivant plante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
   // pClasseur et pInstance sont deux OleVariant 
   Excel := CreateOleObject('Excel.Application');
   Classeur := Excel.Workbooks.Add();
   s := Classeur.BuiltinDocumentProperties.Item(1).Name

et me dit "Membre introuvable"...

Or il me semble bien que les deux instructions sont identiques, non ? (et il est 11 heures du mat', normalement à ç't'heure, j'suis réveillé)

Merci de vos lumières,

Paul

[Laurent Dardenne]

Salut,
quels sont les types des variables utilisées ?

[PaulR]

Aie, serait-ce de là que vient l'erreur ?
s est simplement string (j'ai essayé aussi avec shortstring).

(et les deux autres sont OleVariant of course)...

Paul

[Laurent Dardenne]

Aie, serait-ce de là que vient l'erreur ?

Non c'est une supposition. Il est préférable d'indiquer le maximum d'informations.
En Pascal les parenthéses ne sont pas utilisées pour les tableaux.
Essaie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 s := Classeur.BuiltinDocumentProperties.Item[1].Name

voir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 s := Classeur.BuiltinDocumentProperties[1].Name

Je n'ai pas testé.

[PaulR]

Bon sang mais c'est bien sûr, Yipiiiie...
(et je me fais à chaque avoir sur ces parenthèses / crochets)...
Merci, Laurent !

Paul

(et félicitations et remerciements pour tes tutos et nombreuses contributions !)