Вниз
Скачать: 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.029 c
15-1146656687
Иван Шихалев
2006-05-03 15:44
2006.05.28
Есть практикующие электронщики?


2-1147502661
Mich
2006-05-13 10:44
2006.05.28
Timage


2-1147271681
Adios
2006-05-10 18:34
2006.05.28
Как вычесть из строки?


15-1146758657
Axis_of_Evil
2006-05-04 20:04
2006.05.28
реестр + запуск программы с параметром


15-1146715840
Fin
2006-05-04 08:10
2006.05.28
Доступ в две сети с одной машины!




   Наверх