property Column: integer;

This example sets the value of A1 cell to the number of the first column in the selection.

Workbook.Sheets[1].Range['A1', 'A1'].Value :=  Workbook.Sheets[1].Selection.Column;