alex-lev9 » 23.10.2005 (Вс) 9:08
Пробовал, но от этого становится еще непонятнее. На горизонте вырастает еще одно число.
ВНИМАНИЕ!!!
ActiveWindow.PointsToScreenPixelsX(ActiveWorkbook.ActiveSheet.Columns(7).Left) = 511
Я проверял действие этого метода. Результат его применения представляет собой исходную величину, увеличенную на 31.
Т.е., если у меня ActiveWorkbook.ActiveSheet.Columns(7).Left) = 480,
то
ActiveWindow.PointsToScreenPixelsX(ActiveWorkbook.ActiveSheet.Columns(7).Left) = 511;
если ActiveWorkbook.ActiveSheet.Columns(6).Left) = 418,
то
ActiveWindow.PointsToScreenPixelsX(ActiveWorkbook.ActiveSheet.Columns(7).Left) = 449
Похоже, этот метод как раз-то и прибавляет к columns(1).left=0 ширину столбца с номерами строк. Это можно проверить методом PointsToScreenPixelsY. Применить его к какой-нибудь точке, например ActiveWorkbook.ActiveSheet.Rows(2).Top в том виде как есть. Потом скрыть пару панелей инструментов окна Excel. Значение должно измениться.
Но этим я займусь, возможно вечером, т.к. через пару минут чешу на рыбалку. У нас сегодня отличная погода + 22 градуса.