Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сохранение текста листа - в html - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сохранение текста листа - в html (Макросы/Sub)
Сохранение текста листа - в html
yl3d Дата: Пятница, 04.08.2017, 20:44 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 36
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Доброго времени суток.
Подскажите решение.

Как макросом - сохранить текст, расположенный на листе (в диапазоне A1:I56) - в html файл -в ту же папку, где лежит файл xls ?
(текст в html файле - нужен помеченным разными цветами, как в и эксель файле)
К сообщению приложен файл: 76575.xls(30Kb)
 
Ответить
СообщениеДоброго времени суток.
Подскажите решение.

Как макросом - сохранить текст, расположенный на листе (в диапазоне A1:I56) - в html файл -в ту же папку, где лежит файл xls ?
(текст в html файле - нужен помеченным разными цветами, как в и эксель файле)

Автор - yl3d
Дата добавления - 04.08.2017 в 20:44
InExSu Дата: Пятница, 04.08.2017, 21:45 | Сообщение № 2
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 183
Репутация: 22 ±
Замечаний: 60% ±

Excel 2010
[vba]
Код
Sub InHtml()
    With ActiveWorkbook.PublishObjects.Add(xlSourceRange, ThisWorkbook.Path & "\inhtml.htm", "Лист3" _
        , "$A$1:$I$56", xlHtmlStatic, "inhtml_6692", "")
        .Publish (True)
        .AutoRepublish = False
    End With
End Sub
[/vba]
К сообщению приложен файл: inhtml.xls(40Kb)
 
Ответить
Сообщение[vba]
Код
Sub InHtml()
    With ActiveWorkbook.PublishObjects.Add(xlSourceRange, ThisWorkbook.Path & "\inhtml.htm", "Лист3" _
        , "$A$1:$I$56", xlHtmlStatic, "inhtml_6692", "")
        .Publish (True)
        .AutoRepublish = False
    End With
End Sub
[/vba]

Автор - InExSu
Дата добавления - 04.08.2017 в 21:45
yl3d Дата: Пятница, 04.08.2017, 22:20 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 36
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
InExSu, спасибо. Все работает как надо.
 
Ответить
СообщениеInExSu, спасибо. Все работает как надо.

Автор - yl3d
Дата добавления - 04.08.2017 в 22:20
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сохранение текста листа - в html (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!