Comment ajouter une feuille de calcul après la dernière feuille du classeur?

Je suis de la génération d'une feuille Excel avec Delphi, mais le problème que je me pose, c'est que lorsque j'utilise ce code:

Workbook.Sheets.Add;

la nouvelle feuille est ajoutée avant la actuellement sélectionnée de la feuille de calcul:

Comment ajouter une feuille de calcul après la dernière feuille du classeur?

Personne ne sait comment ajouter une feuille de calcul après la dernière feuille de ce classeur ?

Pour info, le Worksheets.Add méthode a 4 paramètres facultatifs.
Workbook.Sheets.Add.After; Ferait l'affaire?
Peut-être comme Workbook.Sheets.Add(NULL, Workbook.Sheets.Count).

OriginalL'auteur joostmakaay | 2013-12-12

  1. 5

    La Add méthode accepte des paramètres pour vous indiquer l'emplacement pour insérer une nouvelle feuille, en particulier la After paramètre. Il doit être une référence à la feuille pour insérer une nouvelle feuille après. Dans votre cas, vous voulez la dernière feuille. Worksheets est un 1-tableau de base, de sorte que la dernière feuille est donnée par Worksheets[Worksheets.Count]. Mettre tous ensemble, nous obtenons ceci:

    Workbook.Worksheets.Add(After := Workbook.Worksheets[Workbook.Worksheets.Count]);

    OriginalL'auteur Rob Kennedy

  2. 2

    Pour ajouter une nouvelle feuille, nous devons utiliser la méthode .Les draps.Ajouter, il a cinq paramètres (la feuille, la feuille une fois, et 3 autres,dieu seul le sait) dans ce cas j'ai utilisé (NULL,une feuille,NULL,NULL,0), où une feuille à insérer après le dernier.
    bye

    uses
        ... OleServer,  ExcelXP ...
    type
      TForm1 = class(TForm)
        Button1: TButton;
        ExcelApplication1: TExcelApplication;
        procedure Button1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;    
   ...      
    procedure TForm1.Button1Click(Sender: TObject);
    var
    Excelfile:OleVariant;
    aBook: _WORKBOOK;
    aSheet: _WORKSHEET;
    begin
    Excelfile:='c:\plantilla.xls';
    ExcelApplication1.connect;
    aBook:= ExcelApplication1.workbooks.add(Excelfile,0);        

    aSheet:= ExcelApplication1.sheets[aBook.Sheets.Count] as _WORKSHEET;
    aBook.Sheets.Add(NULL,aSheet,NULL,NULL,0);

    aSheet:= ExcelApplication1.sheets[aBook.Sheets.Count] as _WORKSHEET;
    asheet.Name:='Test last position';

    ExcelApplication1.visible[0]:=true;
    ExcelApplication1.disconnect;
    end;
    Bienvenue à Débordement de Pile. Nous préférons pour les réponses à inclure certains phrases répondre à la question, avec un peu de code pour démontrer, si nécessaire. Le Code en lui-même a fait un mauvais travail de répondre à une question, car il oblige le lecteur à inspecter le code très attentivement afin de comprendre exactement quelle partie du code est vraiment pertinent à la question à portée de main.
    ok.. merci pour le commentaire
    Ceci est lié au plus tôt. Le demandeur est à l'aide tardive.
    Je pense que c'est le même.. vous pouvez créer le fichier..ou de l'ouvrir.. ensuite, la manière d'ajouter des feuilles est le même.
    Je ne le pense pas. L'appel à des méthodes différentes de fin et de début du lié. Vous pouvez passer EmptyParam lié au plus tôt, mais tu dois passer tous les. Lié au plus tôt vous pouvez passer qu'une seule.

    OriginalL'auteur Pericles

  3. -1

    L'aide du paramètre après est correct, mais je suis aussi la recherche que j'ai besoin d'utiliser le Type.Manquant pour les autres paramètres que je ne suis pas en précisant

    OriginalL'auteur Charles Janik