Look at using o.Application.ActiveSheet.UsedRange.Columns.Count

Alan

>Hi,
>I want to open up a spreadsheet and select the entire top row,
>so that the column headings will wrap. How do I programmatically
>tell excel to select all columns that have stuff in them?
>Thanks
>Steve
>o = CREATEOBJECT('excel.application')
>o.Application.Workbooks.Open(eFile)
>o.Visible= .T.
>o.Application.DisplayAlerts = .F.
>
>o.Application.Range("A1:O1").Select && <---
>o.Application.Range("O1").Activate && <---
> With o.Application.Selection
> .WrapText = .T.
> EndWith
>o.Application.Range("A1").CurrentRegion.Select