关于Excel里字体对齐方式（熟悉OLE的高手进）

Question

我想选中一个单元格以后，让这个单元格中的文字靠右对齐。
通过录制宏，VBA代码如下：
Range("C4").Select
    With Selection
        .HorizontalAlignment = xlRight
        .VerticalAlignment = xlCenter
        .WrapText = True
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End WithDelphi代码如下：
ExcelApp.Selection.HorizontalAlignment:=xlRight;
但是这里报错：类型不匹配。应该如何处理？  

Answer 1

Sheet.Cells[i+2,j].HorizontalAlignment:=3
Sheet.Cells[i+2,j].VerticalAlignment:=2;横向，列项居中，你改改数字，应该可以达到居右的效果，我估计：Sheet.Cells[i+2,j].HorizontalAlignment:=2
Sheet.Cells[i+2,j].VerticalAlignment:=1;

Answer 2

我用的是ExcelApp.activeworksheet.Application.selection.HorizontalAlignment=xlRight
试试？

Answer 3

xlRight是常量，你在对象浏览器中可以查到对应的数值。然后用数值带上就可以了。

Answer 4

楼上的朋友，你说的对象浏览器是在Delphi中的吗？应该怎么查啊？我不太明白。能具体说说吗？
我也苦于这个问题呢，谢谢了

Answer 5

xlRight的值是-4152
直接用数字代替就行了。

Answer 6

对象浏览器是在VBA里的，你看宏代码的界面里。就在视图中。