Вниз
Скачать: CL | DM;

Задание формата ячеек типа "текст" в экселе созданного через OLE   Найти похожие ветки 

← →
Pine   (2005-02-10 23:16) [0]

Как для книги экселя созданной через

ExcelApp:=CreateOleObject("Excel.Application");

Для части ячеек

   WorkBook.WorkSheets[1].Range[Cell1,Cell2].Select;

сделать формат типа "текст"(а то ведущий ноль в числах пропадает)

Чего только не подставлял после      WorkBook.WorkSheets[1]. ну например типа :

WorkBook.WorkSheets[1].Selection.NumberFormat:= "@";

но при выполнении прога говорит что такого метода нет у объекта автоматизации

Никак не могу найти правильный операнд форматирования ...
Как выйти из ситуации?


← →
Pine   (2005-02-10 23:42) [1]

Вопрос снимается.
Нашел.

WorkBook.WorkSheets[1].Range[Cell1,Cell2].NumberFormat:="@";


← →
Kacnep ©   (2005-06-28 08:51) [2]

Привет мастерам!
Тема сабжа полностью не раскрыта!
Как у всей строки или столбца сделать тоже самое? :)
Или придется с самой первой ячейки это делать джо последней? :)
Вот такие пироги.
Пока решения не нашел - ковыряюсь


← →
YurikGL ©   (2005-06-28 10:11) [3]

Можно попробовать сделать у range.
Но в любом случае должно сработать сначала выбрать range через select, а потом изменить свойство selection-а.
Подробности смотри в макросе.


← →
Kacnep ©   (2005-06-29 12:48) [4]

Ответ нашел сам
WorkBook.WorkSheets[1].Range[Cell1,EmptyParam].Columns....
или Rows
но после упорных ковыряний с разбором ранних и поздних связываний... хех
В общем сейчас понял что просмотрел как человек связывался с экселем.
Всем спасибо!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
15-1146302203
Iv95
2006-04-29 13:16
2006.05.28
Почему программы грузятся медленнее...


3-1144132931
Дмитрий_А
2006-04-04 10:42
2006.05.28
Правильно положить большой файл в БД


8-1135617051
Herosimo
2005-12-26 20:10
2006.05.28
конвертировать bmp в jpeg


6-1138449753
WebSQLNeeder
2006-01-28 15:02
2006.05.28
Вырезать html теги из произвольной строки типа string


2-1147349923
pavelf
2006-05-11 16:18
2006.05.28
Удалить папку




   Наверх