delphi控制excel的问题

Question

请问如何在delphi里实现选中excel的某一整列的内容

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);
  excelworksheet1.Cells.Range['a:a','a:a'].Select;   //选中A列
end;

Answer 2

var
  xl:varinat;
begin
  Xl:=CreateOleObject('Excel.Application');
  Xl.WorkBooks.Add;
  Xl.Column[1].Select;//Select a Column
end;