如何在工作簿的最后一页之后添加工作表？

Question

我正在使用Delphi生成Excel工作表,但我遇到的问题是当我使用此代码时:

Workbook.Sheets.Add;

在当前选定的工作表之前添加新工作表:

有谁知道如何在工作簿的最后一页之后添加工作表？

Answer 1

该Add方法接受您的参数以指示插入新工作表的位置,尤其是After参数.它应该是片材的参考,以便在之后插入新片材.在您的情况下,您想要最后一页.Worksheets是一个基于1的数组,所以最后一个表是由Worksheets[Worksheets.Count].把它们放在一起,我们得到这个:

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