Excel ЧаВо



              

Как получить адрес ячейки?


Delphi:

R: ExcelRange; ... // абсолютные координаты в стиле A1

R := ASheet.Range['A1', EmptyParam]; R.Select; R.Formula := R.Address[True, True, xlA1, EmptyParam, EmptyParam];

// относительные координаты в стиле A1

R := ASheet.Range['A2', EmptyParam]; R.Formula := R.Address[False, False, xlA1, EmptyParam, EmptyParam];

// если указать RowAbsolute и ColumnAbsolute False,

// то будет выдан адрес относительно активной ячейки

R := ASheet.Range['A3', EmptyParam]; R.Formula := R.Address[False, False, xlR1C1, EmptyParam, EmptyParam];

// теперь получим абсолютный адрес

R := ASheet.Range['A4', EmptyParam]; R.Formula := R.Address[True, True, xlR1C1, EmptyParam, EmptyParam];

// также координаты ячейки можно получить из свойств

// Row и Column объекта Range

R := ASheet.Range['A5', EmptyParam]; R.Formula := Format('Строка %d, Колонка %d', [R.Row, R.Column]);

Address Property

Row Property

Column Property




Содержание  Назад  Вперед