怎么样得到一个excel表的sheetname啊？或知道它是否存在特定的sheetname啊？

Question

新年快乐！

Answer 1

form中放三个控件ExcelApplication1、excelworkbook1、excelworksheet1procedure TForm1.Button1Click(Sender: TObject);
begin
  ExcelApplication1.Connect;
  ExcelApplication1.Visible[0]:=true;
//打开工作簿
  ExcelApplication1.Workbooks.Open('路径\文件名.xls',null,false,null,null,null,null,null,null,null,null,null,null,0);
  excelworkbook1.ConnectTo(ExcelApplication1.Workbooks[1]);
  excelworksheet1.ConnectTo(excelworkbook1.Worksheets[工作表的序号(如1)] as _worksheet);
  showmessage(excelworksheet1.Name);
end;

Answer 2

这种方法不可取哦，应该得到sheetname，然后让用户选择一个sheetname再让用户导入。