-
Доброго времени суток! Подскажите как средствами делфи преобразовать xls в html Для rtf файлов делаю так:
var
W: Variant;
begin
W := CreateOleObject('Word.Application');
W.Documents.Open(getcurrentdir+'\info.rtf',False,False);
W.ActiveDocument.SaveAs(getcurrentdir+'\info.html',wdFormatHTML);
W.ActiveDocument.CLose;
W.Quit;
W := UnAssigned;
ExecuteFile(getcurrentdir+'\info.html', '', getcurrentdir, SW_NORMAL);
end;
А как для xls ?
-
Практически тот же код, но сместо ворда надо вызывать excel.application
-
Я тоже догадываюсь что exсel, но wdFormatHTML - вместо этого что должно быть?
-
Так пробую по аналогии
var
E: Variant;
begin
E := CreateOleObject('Excel.Application');
E.Workbooks.Open(getcurrentdir+'\info.xlsx',False,False);
E.ActiveWorkbooks.SaveAs(getcurrentdir+'\info.html',wdFormatHTML);
E.ActiveWorkbooks.CLose;
E.Quit;
E := UnAssigned;
ActiveWorkbooks не проходит
-
Так пробую по аналогии
var
E: Variant;
begin
E := CreateOleObject('Excel.Application');
E.Workbooks.Open(getcurrentdir+'\info.xlsx',False,False);
E.ActiveWorkbooks.SaveAs(getcurrentdir+'\info.html',wdFormatHTML);
E.ActiveWorkbooks.CLose;
E.Quit;
E := UnAssigned;
ActiveWorkbooks не проходит
-
может стоит заглянуть в справочник вба?
-
может стоит заглянуть в справочник вба?
-
wd - это префикс ворда xl - экселя.
-
wd - это префикс ворда xl - экселя.
-
Делаю так
E := CreateOleObject('Excel.Application');
E.Workbooks.Open(getcurrentdir+'\Таблица действия ключей.xlsx',False,False);
E.ActiveWorkbook.SaveAs(getcurrentdir+'\info.html', xlHTML);
E.visible:=True;
Файл создаётся но открывается только в Explorer, другие браузеры зависают. Это получается так даже если я сохраняю в ручном режиме, т.в самом Excel сохранить как. А вот если сохраняю как веб страница в одном файле(mht), то открывается файл во всех браузерах. Как сохранить в формате mht ?
-
Делаю так
E := CreateOleObject('Excel.Application');
E.Workbooks.Open(getcurrentdir+'\Таблица действия ключей.xlsx',False,False);
E.ActiveWorkbook.SaveAs(getcurrentdir+'\info.html', xlHTML);
E.visible:=True;
Файл создаётся но открывается только в Explorer, другие браузеры зависают. Это получается так даже если я сохраняю в ручном режиме, т.в самом Excel сохранить как. А вот если сохраняю как веб страница в одном файле(mht), то открывается файл во всех браузерах. Как сохранить в формате mht ?
-
Наверное, указав имя с расширением mht и соответсвующей константой вместо xlHTML
-
Наверное, указав имя с расширением mht и соответсвующей константой вместо xlHTML
-
xlWebArchive
А вообще надо познакомится с таким прекрасным способом как запись макроса с последующим изучением его содержимого.
-
xlWebArchive
А вообще надо познакомится с таким прекрасным способом как запись макроса с последующим изучением его содержимого.
-
Спасибо! В html переводится, но отображение не во всех браузерах. А в которых отображается инфа, то настолько по-разному, что кажется что разные файлы открываю. Закинул в файлик в комп с линуксом, там Mozila тоже виснет, опера и хромиум открывают, но в разном представлении. Вордовский документ переделывается в html и открывается всеми браузерами корректно. Изучать сам html файл от excel... - там много текста. Буду пробовать открытие через фреймы или блоки и т.п.
-
Спасибо! В html переводится, но отображение не во всех браузерах. А в которых отображается инфа, то настолько по-разному, что кажется что разные файлы открываю. Закинул в файлик в комп с линуксом, там Mozila тоже виснет, опера и хромиум открывают, но в разном представлении. Вордовский документ переделывается в html и открывается всеми браузерами корректно. Изучать сам html файл от excel... - там много текста. Буду пробовать открытие через фреймы или блоки и т.п.
|