Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.08.29;
Скачать: [xml.tar.bz2];

Вниз

Автоподгонка размера ячейки в Excel   Найти похожие ветки 

 
Voldemar   (2002-08-16 02:26) [0]

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

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


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

Sheet.Columns[y].AutoFit


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

Great TNX!

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


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

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


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

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

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


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

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


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

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

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


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

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


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

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

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



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

Форум: "Основная";
Текущий архив: 2002.08.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.009 c
1-95777
-= Like =-
2002-08-19 17:26
2002.08.29
Запись, чтение, поиск строки.


1-95788
Foolio
2002-08-19 19:42
2002.08.29
?


3-95654
nic418
2002-08-08 07:27
2002.08.29
Sp с параметрически задаваемыми именами полей. Помогите!


1-95749
Sniffer
2002-08-19 00:02
2002.08.29
Чтение из текстового файла


14-95944
DeepProg
2002-08-02 19:21
2002.08.29
Education





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский