>I have very limited experience with Office Excel Automation and would like some help.
>
>How do you change a complete column's alignment to LEFT justified, CENTER or RIGHT justified?
>
>Thanks,
>Robert Wright

#define xlLeft   -4131
#define xlRight  -4152
#define xlCenter -4108

LOCAL oExcel AS Excel.Application
oExcel = CREATEOBJECT("Excel.Application")
*oExcel.Workbooks.Open("FullPathToYourExcelFileHere")

oExcel.Workbooks.Add()
oExcel.Visible = .t.

oExcel.Columns("A:A").Select
oExcel.Selection.HorizontalAlignment = xlLeft

oExcel.Columns("B:B").Select
oExcel.Selection.HorizontalAlignment = xlRight

oExcel.Columns("C:C").Select
oExcel.Selection.HorizontalAlignment = xlCenter