Excel Column Autofit from Delphi XE2

Question

I'm moving some older code from Office 2000 to Office 2010 and have ran into an issue with getting Excel to Autofit Columns The code that was working is as follows: ``` for x := 1 to LV.Columns.Count do XLApp.Columns[x].EntireColumn.AutoFit; ``` Where XLApp is a TExcelApplication component When I look at VBA the equivalent code should be ``` Columns("A:A").EntireColumn.AutoFit ``` It's easy for me to change my code so that the range matches the VBA, but that doesn't seem to be the problem. The error returned by the compiler is ``` Class does not have a default property ``` And the `[x]` is highlighted. Code completion does not offer any way that I can see of selecting an individual column, either as an integer or a Range. Any suggestions?

Accepted Answer

The code that you have will work for late bound COM. But you state that you are using early bound COM.

For early bound COM you need to use something like this:

```
ExcelApp.Range['A1','A1'].EntireColumn.AutoFit;
```

I cannot explain how the code worked in the past. Perhaps the import unit created from the Excel type library differed in some subtle way.

Excel Column Autofit from Delphi XE2

Solution

Problem