grouper/créer un plan sous Excel
Bonjour à tous,
je vous soumet un petit problème bien ennuyeux sous Delphi.
Mon application "pilote" une feuille Excel dans laquelle j'ai créé des plans de regroupement (les petits + et - qui permettent de regrouper des colonnes ou des lignes).
J'ai créé un code en VBA indépendant permettant de contracter et déployer ce plan en cliquant sur un bouton de la feuille Excel.
Le problème survient lorsque je veux reprendre ce code (indépendamment du bouton) sous Delphi : j'obtiens toujours le message suivant : "Erreur EOleSysError : le membre est introuvable"
J'ai vérifié plusieurs fois, la plage de cellules Excel est bien la même que dans mon code VBA.
J'ai fait quelques tests en insérant juste des valeurs dans cette plage au lieu de la contracter et ça fonctionne parfaitement.
P.S : comobj est bien enregistré dans la clause USES.
voici le code Delphi :
Code:
1 2 3 4 5 6 7
|
var arange : ansistring;
begin
arange := 'H10';
Feuille.activate;
Feuille.range[arange].Columns(0).Showdetail:=false;
end |
voici le code VBA :
Code:
1 2 3 4
|
Worksheets("Feuil1").Activate
Set arange = Range("H10")
arange.Columns(0).ShowDetail = False |