Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.03.2014, 09:13   #1
Crazy_Gamer
Пользователь
 
Регистрация: 12.12.2009
Сообщений: 10
Вопрос Границы объединенных ячеек в Excel

Здравствуйте! Мне необходимо узнать, где начинается и заканчивается таблица на листе. Для этого я проверяю свойство Borders.LineStyle ячейки. Если ячейка с границами со всех сторон, то свойство = 1, если без границ, или с какой-нибудь одной границей то <>1.
Код:
i:=1;
  while E.Cells[i,1].Borders.LineStyle<>1 do
    begin
      ShowMessage(InttoStr(E.Cells[i,1].Borders.LineStyle));
      Inc(i);
    end;
  n:=i-1;
  while E.Cells[i,1].Borders.LineStyle=1 do
    Inc(i);
  k:=i-1;
  i:=1;
  while E.Cells[n,i].Borders.LineStyle=1 do
    Inc(i);
  m:=i-1;
//n,k,m начало, высота и ширина таблицы
Проблема в том, что для объединенных ячеек Borders.LineStyle=Nil.
Как можно проверять есть ли границы у объединенных ячеек или нет?

Последний раз редактировалось Crazy_Gamer; 21.03.2014 в 09:45.
Crazy_Gamer вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сортировка объединенных ячеек lalike Microsoft Office Excel 4 01.02.2011 17:26
Поиск объединенных ячеек danetda Microsoft Office Excel 11 01.02.2011 06:09
Автофильтр объединенных ячеек evg31612 Microsoft Office Excel 1 13.09.2010 12:22
Проблема с автозаполнением объединенных ячеек alec_av Microsoft Office Excel 6 05.05.2010 12:02
Корректная печать объединенных ячеек zloy_nick Microsoft Office Excel 5 26.02.2009 16:21