HELP sur Active X, tri des lignes

Question

J'essaie de trier le slignes de données numériques d'un composant F1Book d'ActiveX, pour supprimer ensuite les lignes présentes en double, triple ou plus. Je peux compiler le prog suivant, mais il produit une erreur d'exécution "erreur d'exception EOle exception" avec le message "invalid celle reference". Un de vous trouve l'erreur?

Merci d'avance, je suis vraiment bloquée
Sophie

begin
x:=data.LastRow;
y:=data.LastCol;
For i :1 to x do   //tentative de tri complet: si val sup ou dans la ligne i+1 (dans l'ordre de comparaison colonne par colonne)passer a la comparaison i+1/i+2, sinon deplacer la ligne i+1 pour la placer au dessus de i
        For j := 1 to y do
        begin
        a:=data.NumberRC [i, j];
        b:=data.NumberRC [i+1, j];
        if b>=a then continue else
        data.InsertRange (i, 1, i, -1, F1ShiftVertical);
        data.MoveRange(i+1,-1,i+1,-1, i,-1);
        end;

end;

end.

cs_Delphiprog · Answer

"invalid celle reference" : référence de cellule invalide. Celà signifie que tu essaies d'accèder à une cellule inexistante. Es-tu sur que LastCol et LastRow correspondent bien aux indices des colonnes ?

May Delphi be with you

HELP sur Active X, tri des lignes

1 réponse

Votre réponse

Discussions similaires