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

Вниз

Excel, автоподбор высоты строки.   Найти похожие ветки 

 
Wood   (2006-10-31 07:31) [0]

Здравствуйте. Помогите, плз!
Пишу, примерно, следующее:
   
WorkSheet.Range["A1","D3"].VerticalAlignment:=xlHAlignCenter;
WorkSheet.Range["A1","D3"].WrapText:=True;
WorkSheet.Range["A1","D3"].Merge(xlLeft);
WorkSheet.Cells.Item[1,1]:=<тут длинный текст из БД>

при объединенных ячейках не хочет высота строки автоматом выстроиться.
Если не объединять, то норм.


 
umbra ©   (2006-10-31 10:20) [1]

Worksheet.Cells.Item[1,1].Autofit;


 
Wood   (2006-10-31 10:35) [2]


> umbra ©   (31.10.06 10:20) [1]
>
> Worksheet.Cells.Item[1,1].Autofit;

ругается "Несовпадение типов" :(


 
umbra ©   (2006-10-31 11:00) [3]

пользуететесь TExelApplication?


 
EvS ©   (2006-10-31 11:08) [4]

А ты попробуй в Excele вручную это сделать.
Для объединенных ячеек автоподбор вроде бы вообще не работает.


 
umbra ©   (2006-10-31 11:12) [5]

был неправ, приношу свои извинения. Autofit применяется только для целых строк и столбцов. Посему

Worksheet.Rows[1].Autofit;


 
Wood   (2006-10-31 12:46) [6]


> umbra ©   (31.10.06 11:00) [3]
> пользуететесь TExelApplication?

Да

> umbra ©   (31.10.06 11:12) [5]
Worksheet.Rows[1].Autofit;

не-а...уже компилятор в шоке -  "клас не имеет пропертей по умолчанию"
Боюсь,
> EvS ©   (31.10.06 11:08) [4]

прав...


 
umbra ©   (2006-10-31 12:48) [7]

про TExelApplication ничего не знаю, помочь ничем не могу :(


 
umbra ©   (2006-10-31 12:51) [8]

кстати, я написал именно так, как это происходит в Экселе


 
Wood   (2006-10-31 13:00) [9]

спасибо, umbra, EvS...



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

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

Наверх




Память: 0.48 MB
Время: 0.05 c
11-1139241807
ECM
2006-02-06 19:03
2006.11.19
KOLButton.OnEnter &amp; OnLeave ???


9-1137507692
kavis
2006-01-17 17:21
2006.11.19
адресный регистр


2-1162476869
Ironman
2006-11-02 17:14
2006.11.19
Компонент отображения файлов DWG


15-1162559111
ArtemESC
2006-11-03 16:05
2006.11.19
Фильм "Остаться в живых"


15-1162262217
Mozart
2006-10-31 05:36
2006.11.19
Подскажите начинающему железячнику :)