Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.28;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.052 c
2-1147111725
Nicky
2006-05-08 22:08
2006.05.28
Ошибка при проссмотре отчета


15-1146170587
Commerce
2006-04-28 00:43
2006.05.28
ShareWare


2-1147203470
Mr tray
2006-05-09 23:37
2006.05.28
узнать хендл объекта с фокусом клавиатуры


1-1145612267
petun[-]
2006-04-21 13:37
2006.05.28
группируем несколько процедур в одну


15-1146597572
kilonet
2006-05-02 23:19
2006.05.28
Перевод книги в электронный формат