Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Автоподгонка размера ячейки в Excel [D6, WinXP]


Voldemar ©   (2002-08-16 02:26:00) 

Доброе время суток!
Проблема состоит в следующем: когда я передаю данные в Excel такой методой
Sheet.cells[x,y]:=MyString;

как бы мне сделать, чтобы ширина ячейки соответствовала длине строки? Или хотя бы жестко задать ширину...


Balu   (2002-08-17 10:38:00) [1]

>Voldemar
>>Я именно об этом и спрашиваю - КАК его делать текстовым?

Sheet.cells[x,y]:= """"+"000";
Excel сам "подумает" что это текстовое значение, причем символа """ не будет видно.
ЗЫ. Просто добавь символ """ перед значением.


TTCustomDelphiMaster   (2002-08-17 10:13:00) [2]

1. Excel - Сервис - макрос - начать запись. Потом просмотр в редакторе VB.
2. Поставить help по VB из поставки office.
3. MSDN Library.


Voldemar   (2002-08-17 01:39:00) [3]

>TTCustomDelphiMaster © (16.08.02 22:07)
Вот это уже конкретика... Благодарю.

PS. А где бы надыбать RTFM по этому вопросу? В делфовом хелпе ну очень уж скудно это описано, а Code Completing в этих случаях не работает, да и работать не должен...


TTCustomDelphiMaster   (2002-08-16 22:07:00) [4]

Voldemar © (16.08.02 20:37)
примерно так
Range.NumberFormat := "@"


Voldemar   (2002-08-16 20:37:00) [5]

>TTCustomDelphiMaster © (16.08.02 19:29)
Серьезно?! :)) А мне бы и в голову не пришло...:))

Я именно об этом и спрашиваю - КАК его делать текстовым? Естественно, не открывая предварительно excel, чтобы заняться этим ручками, а при создании книги или добавлении текста в ячейку из программы. Хотя я уже решил этот вопрос, правда, несколько извращенно - добавляя пустую строку в начало данных в каждой ячейке. Но хотелось бы грамотное решение...


TTCustomDelphiMaster   (2002-08-16 19:29:00) [6]

Voldemar © (16.08.02 17:25)
Делать формат ячейки текстовым.


Voldemar   (2002-08-16 17:25:00) [7]

Great TNX!

Теперь возникла другая проблема: у меня частенько встречаются значения типа 000, 02 и т.п., причем число нулей очень существенно. Но вредный Excel самостоятельно преобразовывает их в числовой формат со всеми вытекающими (обрезает "лишние" нули)... Как это побороть?


Ekaterina   (2002-08-16 06:59:00) [8]

Sheet.Columns[y].AutoFit


Наверх

Титульная страница Поиск, карта сайта Написать письмо