Delphi如何控制Excel2000的单元格的属性!(88分)

  • 主题发起人 主题发起人 zhoulide
  • 开始时间 开始时间
Z

zhoulide

Unregistered / Unconfirmed
GUEST, unregistred user!
我用ole把数据库中的数据发送到Excel中去,可是当数据为5-6,3-4等样子时候
Excel显示为5月号,3月4号,变成了日期类型,如果单元格的属性是文本就好了,
问题就是我如何用delphi再程序中设置单元格的属性是文本,希望得到各位大侠的建议,
等待中!
 
兄弟,有高手知道吗?急啊!
 
没有人啊?有人说说吗?111
 
好像设成文本也不行啊
5-6是excel默认的一种日期格式,你只有这么输入它就会自动转换的。
你是否一定要以这种格式输入呢。用“5--6”多一个"-"号就没问题了
 
前面加'号。
 
Excel默认是那样的! 你要先设置单元格的格式才行!
uses ComObj;

/// Selection.NumberFormatLocal:='@';//文本格式
procedure TForm1.Button1Click(Sender: TObject);
var
Excel: Variant;
WorkBook: Variant;
WorkSheet: Variant;
begin
Excel := CreateOLEObject('Excel.Application');
WorkBook := Excel.WorkBooks.Add;
WorkSheet := WorkBook.WorkSheets[1];
WorkSheet.Cells[1,1]:='5-6';

WorkSheet.Cells[1,2].NumberFormatLocal:='@';
WorkSheet.Cells[1,2]:='5-6';
Excel.Visible:=true;
end;

运行上面的代码你就可以知道差别在那里!

 
后退
顶部