Delphi 代码ole自动化excel错误

这个代码给了我一个错误

ex.Cells [3, 2]. HorizontalAlignment: = xlright;

ex.Cells [row, 1]. NumberFormat: = 'dd / mm / yy, @';

我怎样才能解决这个问题

---

谢谢

基于您的其他问题，您正在使用后期绑定（使用

变体

）而不是早期绑定（使用VCL

texcel应用程序

和其他组件）。这意味着像

xlRight

这样的特定类型没有定义，因为您没有使用提供它们的类型库导入。您必须自己定义它们：

var
...
NewAlign:OleVariant；
常数
xlBottom=$ffffff5；
xlLeft=$fffffdd；
xlRight=$ffffffc8；
xlTop=$fffffc0；
xlHAlignCenter=$ffffff4；
xlHAlignCenterAcrossSelection=$00000007；
xlHAlignDistributed=$fffffeb；
xlHAlignFill=$00000005；
xlHAlignGeneral=$00000001；
xlHAlignJustify=$ffffffde；
xlHAlignLeft=$FFFFFDD；
xlHAlignRight=$FFFFFC8；
开始
//XLApp是您从上一个应用程序中设置的Excel实例
//问题
XLApp.Workbooks[1]。工作表[1]。范围['C1:C5']。编号格式：='dd/mm/yy'；
NewAlign:=xlHAlignRight；
XLApp.Workbooks[1]。工作表[1]。范围['C1:C5']。水平对齐：=NewAlign；
结束；

---

分配

dd/mm/yy@

没有意义，因为它要么是日期格式

dd/mm/yy

，要么是文本

@

，但不是两者都有

请停止在主题行中添加标签信息。标记可用是有原因的。请使用它们。（你也会一直把

XE3

it作为标题，但是使用

XE2

标签。下定决心-是XE2还是XE3？）你还需要更具体一些。如果您不告诉我们错误是什么，“此代码给我错误”没有任何意义-我们无法从我们所在的位置看到您的屏幕。您得到的具体错误是什么？哪一行代码导致错误？第一个是指

Sheet.Cells

，第二个是指

ex.Cells

；什么是

Sheet

和

ex

？您没有说明错误是什么。但是你可以看到错误。那么，为什么这个问题不存在呢？试着猜测并不是一件有趣的事。请始终包括完整的错误消息，逐字复制-直到问题解决。谢谢你的回答。我不使用VCL TexelApplication和其他组件（我发现已安装此组件，不知道在何处查找和如何安装。如果您能给我一些建议，谢谢您…..我刚开始使用delphi）我使用了您发布的代码，但在运行时，我收到以下错误：“无法设置类Numberformat范围的属性”-到目前为止-以及“无法设置类范围的水平对齐属性”-对于xlright。对不起，我是初学者。。。谢谢你。问题出在这行代码中：XLApp.Workbooks[1]。工作表。[1] 范围['C1:C5']。编号格式：='dd/mm/yy'；错误是：Numberformat无法设置类的范围。我不知道如何修复…谢谢你的回复。我不使用VCL TexelApplication和其他组件（我发现已安装此组件，不知道在何处查找和如何安装。如果您能给我一些建议，谢谢您…..我刚开始使用delphi）我使用了您发布的代码，但在运行时，我收到以下错误：“无法设置类Numberformat范围的属性”-到目前为止-以及“无法设置类范围的水平对齐属性”-对于xlright。对不起，我是初学者。。。谢谢你。它很旧（大约从Delphi 5s开始，IIRC），但它仍然有一些关于使用Excel自动化进行早期和后期绑定的有用信息。至于如何查找和使用

TExcelApplication

，这是一个与此不同的问题。如果你想问这个问题，可以发布一个新问题。：-）@大卫：谢谢你的编辑。