TMS FlexCel Sheet工作表选择和查找
属性和方法
TXlsFile.GetSheetIndex
function GetSheetIndex(const sheetName: string): Integer;
function GetSheetIndex(const sheetName: string; const throwException: Boolean): Integer;
在工作簿上查找工作表名称并返回其索引。
重载
GetSheetIndex(string, Boolean)
根据throwException参数,如果工作表不存在,此方法将引发异常或返回 -1。
GetSheetIndex(string)
如果工作表不存在,它将引发异常。
参数
sheetName 要查找的工作表。
throwException 如果未找到工作表,throwException = true
时将引发异常。throwException = false
时将返回 -1。
返回值
如果工作表存在,则工作表索引,否则抛出异常。
TXlsFile.GetSheetSelected
function GetSheetSelected(const sheetIndex: Integer): Boolean;
如果选择了工作表,则返回 true,否则返回 false。
请注意,在Excel中可以通过按住shift或ctrl键单击工作表选项卡来选择许多工作表。另请注意,当更改
TExcelFile.ActiveSheet
时,选中的工作表将重置为活动工作表。因此,如果您想找出文件中选择了哪些工作表,您应该在打开文件后,但在更改活动工作表之前调用此方法。
参数
sheetIndex 工作表索引(从1开始)。
TXlsFile.SetSheetSelected
procedure SetSheetSelected(const sheetIndex: Integer; const selected: Boolean); override;
此方法会将工作表选项卡设置为选中状态。
请注意,这与
TExcelFile.ActiveSheet
的不同之处在于您可能只有一个活动工作表,但可以通过按住ctrl键单击多个选项卡来选择它们。 另请注意,当更改TExcelFile.ActiveSheet
时,选中的工作表将重置为活动工作表。 因此,如果要保存包含多个选中工作表的文件,则应在最后一次调用TExcelFile.ActiveSheet
之后调用此方法。
参数
sheetIndex 工作表索引(从1开始)。
selected 如果为 true,则将选择工作表,否则将取消选择工作表。
例子
查找和选中
procedure TForm1.Button14Click(Sender: TObject);
var
Xls: TXlsFile;
SheetIndex: Integer;
begin
//读取Excel文件
Xls := TXlsFile.Create('C:\Users\Administrator\Desktop\ceshi.xlsx');
try
//根据Sheet名称查找对应索引
SheetIndex := Xls.GetSheetIndex('Sheet3', False);
if SheetIndex = -1 then
begin
Memo1.Lines.Add('Sheet3的未找到');
end
else
begin
Memo1.Lines.Add('Sheet3的索引' + SheetIndex.ToString);
end;
//判断是否选中
if Xls.GetSheetSelected(SheetIndex) then
Memo1.Lines.Add('选中')
else
Memo1.Lines.Add('没选中');
//设置前2个Sheet为选中
Xls.SetSheetSelected(1, True);
Xls.SetSheetSelected(2, True);
//保存文件
Xls.Save('C:\Users\Administrator\Desktop\ceshi1.xlsx');
finally
Xls.Free;
end;
end;
标签:TMS,Sheet,FlexCel,工作,查找,选中,const,GetSheetIndex,Xls
From: https://www.cnblogs.com/txgh/p/16615052.html