Question

delphi中如何取得Excel的单元格的名称?

Answer 1

如果你是想获得Worksheets名称的话。
var
excel: OLEVariant;
WorksheetsName : string;
i : integer;
begin
try
//打开EXCEL
excel:=CreateOleObject('Excel.Application');
except
application.Messagebox('无法打开Xls文件，请确认已经安装EXCEL.', '', mb_OK + mb_IconStop);
Exit;
end;
excel.Visible := false;
excel.WorkBooks.open('aaa.xls');
excelcount := excel.Worksheets.count; //获取Worksheets数
for i := 1 to excelcount do
begin
excel.WorkSheets[i].Activate;
WorksheetsName:=excel.Worksheets[i].name; //Worksheets名称
end;
Excel.quit;//关闭EXCEL
end;

Answer 2

这个得查查vba，跟delphi没关系

追问

该如何查呢，我不太懂！！

Answer 3

delphi操作excel单元格没有名称，只需要通过行列来指定就行了
如给第一行第四列赋值可以：

var ExcelApp: Variant;
ExcelApp.Cells[1,4].Value := '第一行第四列';