Question

DELPHI里怎样根据EXCEL单元格名称定位？

Excel的单元格可以用一个名称来命名它，如单元格A1可以被命名为‘ActiveCell'。
我的问题是：我想用Excel的Application对象的goto方法，使得被命名的单元格成为当前的活动单元格。在Delphi程序中，该如何书写程序代码？
可能ZZLUO兄对我的问题还不是太了解，我想要的是按单元格的名称来定位，而不是按照Cells函数来定位，希望大家能继续提供答案，我新手，没多少分，全部一次性拿出来了！

Answer 1

你自己都理解的差不多了，自己写个程序试试就出来了

没找到Goto方法

以前写过类似的东西，整理下给你，已经测试过的，记得Use Comobj

procedure TForm1.Button1Click(Sender: TObject);
var
FExcelApp: Variant;
FSheet: Variant;
FRange: Variant;
begin
FExcelApp := CreateOleObject( 'Excel.Application' );
FExcelApp.Visible := False;
FExcelApp.Caption := 'XXXXXXX';
FExcelApp.WorkBooks.Add;
FExcelApp.WorkSheets[1].Activate;
FSheet := FExcelApp.WorkSheets[1];
FRange := FSheet.Cells[2,2]; //FRange就是你需要的单元格，修改Cells[x,y]的值看效果
//接下来对这个FRange设置属性
FRange.NumberFormatLocal := '@';
FRange.Value := '测试';
FRange.Font.Name := '宋体';
FRange.Font.Size := '12';
FRange.Font.Color := clred;
//--------------------
FExcelApp.Visible := True;
end;

呵呵，我自己都快不记得了，正好复习一下

希望对你有帮助