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

Вход

Регистрация

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

 

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

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

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

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

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

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

Excel 2010, 365
[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 (40.5 Kb)


Разработчик Битрикс24 php, Google Apps Script, VBA Excel Windows/Mac
 
Ответить
Сообщение[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
Группа: Пользователи
Ранг: Участник
Сообщений: 66
Репутация: 0 ±
Замечаний: 0% ±

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

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

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