Discussion :

[franckjoane]

Bonjour,
je cherche a savoir quelle est le numéro de la feuille excel qui est en cours d'utilisation. (delphi 7 et excel2007 avec l'unité Comobj)
je prends la main sur excel par:

Excel := GetActiveOleObject('Excel.Application');
Feuille := Excel.WorkSheets['Feuil1'];

comment récupérer l'integer qui représente 'Feuil1'?
La question doit etre super basic mais je ne trouve pas.

j'ai essayé :

numfeuille := excel.activesheet.itemindex; //numfeuille : integer
j'obtiens une erreur OLE car itemindex n'est reconnu...

Merci.
Existe t-il une doc contenant les fonctions et procédures et constantes de pilotage d'excel par delphi ?

[ShaiLeTroll]

Je pense que la MSDN Excel devrait contenir toutes les informations comme les propriétés de WorkSheet

ItemIndex désigne plutôt une sélection, alors que "Index" indique plutôt la position d'un objet dans une collection

[franckjoane]

le lien me donne de très bonnes informations sur le pourquoi mais quand je passe au comment...

j'essaye avec:

numfeuille := excel.sheets.index;

toujours message: erreur Ole methoe 'Index' non supportée
Je dois vraiment être nul !

[ShaiLeTroll]

Tu peux aussi regarder Description de l'objet Feuille de calcul dans Excel, comme c'est en VBA, c'est aussi du Late Binding !

Essaye

Code :

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

1
2
3
Excel := GetActiveOleObject('Excel.Application');
Feuille := Excel.WorkSheets['Feuil1'];
numfeuille := Feuille.Index;

ou

Code :

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

numfeuille := Excel.ActiveSheet.Index;

Attention comme en Late Binding on a aucun contrôle à la compilation, il faut être rigoureux sur les noms, ActiveSheet et Sheets[] ce n'est pas la même chose

[franckjoane]

Merci beaucoup pour les liens très interressants et pour la réponse.
Ca marche.
Cela confirme ma nullité mais je progresse !