Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

Соединение ячеек в Excel   Найти похожие ветки 

 
Андрей Жук ©   (2005-06-30 17:27) [0]

При соединении ячеек в Excel выполняется такой код

  Range("A2:C2").Select
   With Selection
       .HorizontalAlignment = xlCenter
       .VerticalAlignment = xlCenter
       .WrapText = True
       .Orientation = 0
       .AddIndent = False
       .IndentLevel = 0
       .ShrinkToFit = False
       .ReadingOrder = xlContext
       .MergeCells = False
   End With
   Selection.Merge

Это если записать марос в Excel
Если же соединять ячейки в Delphi через TExcelApplication,
то имеем следующий код
       with Range["A2:С2", EmptyParam] do
       begin
         Mergecells := False;
         HorizontalAlignment := xlCenter;
         VerticalAlignment := xlCenter;
         WrapText := True;
         Orientation := 0;
         AddIndent := False;
         IndentLevel := 0;
         ShrinkToFit := False;
         ReadingOrder := xlContext;
         MergeCells := False;
         Merge(False);
         Font.Bold := True;
         Value := Caption;
       end;

но получаем не совсем то, что нужно.
Ячейки как бы объединены, но только формально. Можно писать в любую из объединяемых ячеек.
Где ошибка?


 
Digitman ©   (2005-06-30 17:38) [1]


> Можно писать в любую из объединяемых ячеек


а что этому должно помешать ?

объединение - чисто визуальный эффект, объединение не позволяет юзеру интерактивно записывать значения в некоторые из объединяемых ячеек , программной же записи при этом ничто мешать не должно


 
Андрей Жук ©   (2005-06-30 17:42) [2]

так в том то и дело, что можно интерактивно вводить значения в объединенные ячейки.


 
Digitman ©   (2005-06-30 17:48) [3]

значит, в этом случае устанавливать св-во Value для всех объединенных ячеек в указанном диапазоне недопустимо



Страницы: 1 вся ветка

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
14-1119606881
хм
2005-06-24 13:54
2005.07.18
486 корпус


3-1118052125
Леонид
2005-06-06 14:02
2005.07.18
SQL запрос


14-1119515894
dtl
2005-06-23 12:38
2005.07.18
3d координатная сетка,повороты,масштабирование...


3-1118205610
Ярослав
2005-06-08 08:40
2005.07.18
Диалог создания строки соеденения в ADOConnection


14-1119436305
saNat
2005-06-22 14:31
2005.07.18
Автоматическое резервное копирование данных рабочих станций