Как можно осуществить процедуру Selection.End(xlDown).Select в паскале?,
обращаясь к Excel`ю данным образом:

XLApp:= CreateOleObject('Excel.Application');
XLApp.Workbooks.Open(FileName);
Sheet:=XLApp.Workbooks[1].WorkSheets[1];

Sheet.Range[такой-то].End(значение константы xlDown).Select

В том то и дело: "значение константы!", а каким образом можно узнать это значение да и прочие..., а то задалбливает цифры перебирать)

> Krants   (19.09.06 13:29) [2]


В Ёхеле открываешь редактор визуального васика, жмешь Ctrl-G, в открывшемся при этом окне набираешь ?xlDown и имеешь удовольствие

> Сергей М.

Узнал код(-4121), но чегото не выходит...

ЗЫ: за "визуальный васик" респект.

> чегото не выходит


Для того чтобы "чегото" вышло, нужно чтобы это "чегото" сначала туда вошло

> каким образом можно узнать это значение да и прочие



вместо 97 надо подставить номер версии оффиса (2000, ХР и т.д.)

> umbra

Да просто нехочется засорять программу лишними библиотеками, да и к тому же может возникнуть конфликт при использовании 2000 б-ки на машине с 97 Офисом...


> Сергей М.


Это "чегото" входит, только "ничегото" не выходит...
можеш показать на примере, если несложно.

XLApp.Selection.End[-4121].Select;