Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

COM-надстройки для Excel   Найти похожие ветки 

 
Катерина   (2005-07-01 11:04) [0]

У меня написана программа, преобразующая в выделенных ячейках Excel`я даты в строковый формат:

program Excel_DateToStr;

uses Forms, ComObj, SysUtils, Variants;

{$R *.res}

var xls, sht : variant; DateStr : string;
   i,j, i1,j1 : integer;

begin
 Application.Initialize;

 xls := CreateOleObject("Excel.Application");
 xls.Workbooks.open("C:\Programs\Excel\Книга6.xls");
 xls.Visible := true;
 sht := xls.ActiveSheet;

 i1 := xls.Selection.Row;
 j1 := xls.Selection.Column;

 For i := i1 To i1 + xls.Selection.Rows.Count - 1 do
   For j := j1 To j1 + xls.Selection.Columns.Count - 1 do
   begin
     DateStr := DateToStr(sht.Cells[i, j].Value);
     sht.Cells[i, j].NumberFormat := "@";
     sht.Cells[i, j].Value := DateStr;
   end;

 xls := UnAssigned;

end.


Мне бы надо, чтобы программа работала с уже открытой, активной книгой Excel`я, запускалась из него и была "прописана" как "надстройки для модели COM...". Литературы, хелпов, как это сделать, я не нашла. Может кто что-нибудь посоветует или даст ссылку на литературу. EXCEL 2000


 
Digitman ©   (2005-07-01 11:11) [1]

не проще ли реализовать свой алгоритм в "родном" для Ёхеля xla-формате ?


 
Катерина   (2005-07-01 12:28) [2]

Проще (это реализовано уже давно), но мне хотелось бы разобраться именно с "надстройками для модели СОМ..."


 
Digitman ©   (2005-07-01 12:43) [3]


> мне хотелось бы разобраться именно с "надстройками для модели
> СОМ..."


тогда твоя текущая реализация никак не годится для этой цели

из лит-ры могу порекомендовать книгу "Разработка СОМ-приложений в среде Delphi", автор - Эрик Хармон

http://books.dore.ru/bs/f1bid1417.html

заметь, что даже реализовав свое приложение в виде СОМ-объекта и подключив его в кач-ве "надстройки", тебе все равно так или иначе придется обращаться к этому объекту программно из VBA-кода, чтобы управлять этим объектом (вызывать его методы, обращаться к свойствам)


 
k2 ©   (2005-07-01 12:50) [4]

http://www.compress.ru/Temp/1771/index.htm
"Если бы Тенцера небыло, его следовало бы выдумать" не знаю чье


 
k2 ©   (2005-07-01 12:55) [5]

зы.сказано было не про Анатолия а зря



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

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

Наверх




Память: 0.47 MB
Время: 0.055 c
14-1119880085
_Anton
2005-06-27 17:48
2005.07.18
Пустой буфер при GetFieldData


4-1116861129
Volume
2005-05-23 19:12
2005.07.18
Мышь


3-1117991302
dim2002
2005-06-05 21:08
2005.07.18
Сортировка в ADO


1-1119947114
rolex
2005-06-28 12:25
2005.07.18
Вопрос по TreeView


14-1118770266
ArMellon
2005-06-14 21:31
2005.07.18
Какие песни Арии вам больше всего нравятся?