Discussion :

[Vertyos]

Bonjour,

Il ne me semble pas avoir vu de réponse à ce problème dans la faq ni dans les anciens sujets, désolé si le problème a malgré tout déjà été rencontré.

J'utilise un objet OLE pour contrôler une instance d'Excel, et j'aurais besoin d'écrire des commentaires dans certaines cellules. Le problème est qu'en créant une macro pour voir le code nécessaire pour réaliser cette operation, j'obtiens quelque chose ressemblant à :

Code :

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

Range("A1").Comment.Text Text:="test"

Le problème est qu'en Delphi, impossible d'appeler une méthode "Text Text", du moins pas avec cette syntaxe. Y a-t-il une autre façon de procéder ?

Merci.

[anapurna]

salut


regarde du cote de

Code :

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

Cellule.AddComment(Buffer);

@+ Phil

[Vertyos]

Salut,

Effectivement c'est une bonne solution pour contourner le problème lors de l'écriture, mais il est toujours impossible de lire les commentaires déjà présents dans une cellule. (Au temps pour moi, j'avais oublié de préciser cette contrainte)

[anapurna]

salut

regarde de ce cote la

Code :

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

1
2
3
ActiveCell.AddComment ("")
ActiveCell.Comment.Visible = True
ActiveCell.Comment.text

@+ Phil

[Vertyos]

Salut,

Pas mieux, cette fois ça plante carrément (j'ai du mal à comprendre pourquoi d'ailleurs... mais impossible d'accéder à Comment.Text)

[edit] Plus précisément, ça fonctionne quand la cellule contient un commentaire, mais ça crashe quand elle n'en contient pas (au lieu de lever une exception OLE comme d'habitude)

[defluc]

Depuis que j'utilise l'objet Automation, je n'ai qu'à m'en féliciter.