Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2017.04.23;
Скачать: [xml.tar.bz2];

Вниз

Преобразование xls в html   Найти похожие ветки 

 
Андрей_1 ©   (2015-09-03 06:10) [0]

Доброго времени суток!
Подскажите как средствами делфи преобразовать 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 ?


 
Dimka Maslov ©   (2015-09-03 10:56) [1]

Практически тот же код, но сместо ворда надо вызывать excel.application


 
Андрей_1 ©   (2015-09-03 12:01) [2]

Я тоже догадываюсь что exсel, но wdFormatHTML - вместо этого что должно быть?


 
Андрей_1 ©   (2015-09-03 12:17) [3]

Так пробую по аналогии

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 не проходит


 
кгшзх ©   (2015-09-03 13:11) [4]

может стоит заглянуть в справочник вба?


 
Dimka Maslov ©   (2015-09-03 13:50) [5]

wd - это префикс ворда
xl - экселя.


 
Андрей_1 ©   (2015-09-03 14:52) [6]

Делаю так

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 ?


 
Dimka Maslov ©   (2015-09-03 18:52) [7]

Наверное, указав имя с расширением mht и соответсвующей константой вместо xlHTML


 
Dimka Maslov ©   (2015-09-03 18:56) [8]

xlWebArchive

А вообще надо познакомится с таким прекрасным способом как запись макроса с последующим изучением его содержимого.


 
Андрей_1 ©   (2015-09-04 05:07) [9]

Спасибо!
В html переводится, но отображение не во всех браузерах. А в которых отображается инфа, то настолько по-разному, что кажется что разные файлы открываю. Закинул в файлик в комп с линуксом, там Mozila тоже виснет, опера и хромиум открывают, но в разном представлении.
Вордовский документ переделывается в html и открывается всеми браузерами корректно.
Изучать сам html файл от excel... - там много текста. Буду пробовать открытие через фреймы или блоки и т.п.



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

Форум: "Начинающим";
Текущий архив: 2017.04.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.001 c
15-1460100846
Rouse_
2016-04-08 10:34
2017.04.23
Есть у нас спецы по гуглевскому Blogger?


15-1460496602
Юрий
2016-04-13 00:30
2017.04.23
С днем рождения ! 13 апреля 2016 среда


15-1460583005
Юрий
2016-04-14 00:30
2017.04.23
С днем рождения ! 14 апреля 2016 четверг


6-1283241621
RGV
2010-08-31 12:00
2017.04.23
Socks5


15-1460716341
xayam
2016-04-15 13:32
2017.04.23
Пятничная задачка





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский