Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Как сравнить 2 таблицы по нескольким столбцам http://www.cyberforum.ru/vba/thread1470472.html
Доброго времени суток. Есть 2 на листах "In_data" и "One_price" нужно : 1. сравнить их сначала по столбцу "А" обе таблицы, 2. если найдено совпадение, тогда проверить для этой строки столбец...
VBA Организовать последовательный поиск и вывол числа операцией сравнения
Помогите,нужно написать программу организовать последовательный поиск и вывол числа операцией сравнения Добавлено через 5 часов 11 минут Sub one() Function SeqSearch(item, count, key) As Integer...
VBA Нужно чтобы при нажатии на кнопку в нужную таблицу добавлялся столбец
Доброго времени суток! Есть форма с текстовым полем HARNESSPN , выпадающим списком mRef и кнопкой. Есть три разных таблицы. Выбор таблицы зависит от выбранного значения поля mRf, т.е., например если...
VBA Вычислить значение функции Дан массив x(1Xn) Построен массив y y(x) = \begin{cases} x<0 \Rightarrow y(x)=|x| \\ x+0 \Rightarrow y=1 \\ y>0 \Rightarrow y=x+1 \end{cases} http://www.cyberforum.ru/vba/thread1470335.html
VBA Перечисление окон высшего уровня EnimWindows http://www.cyberforum.ru/vba/thread1470302.html
Здравствуйте. Я второй раз в жизни вижу бэйсик. Хочу сделать так. Пусть программа мне выводит все окна верхнего уровня и для каждого окна заголовок и хэнд окна. Я код нашел, в нем более менее...
VBA Макрос, меняющий размер шрифта на определенную величину
Здравствуйте. Задачка такая. Есть вордовский документ, в котором часть слов набрана Times New Roman, часть Courier New. Для Таймса размер шрифта должен меняться на единицу в плюс, для Курьера -...
Вытащить часть значения переменной между двумя знаками VBA
Доброго времени суток! Имеется переменная A со значением вида "BK2T-14301-AB". Мне нужно то, что находится после первого знака "-" и до второго знака "-" присвоить значению другой переменной, т. е....
VBA Заполнение ячеек листа данными из файла надо что бы кнопка загружала файлы. и из каждого файла ( там файлы с цифрами) эти цифры потом можно было поставить в яйчейки http://www.cyberforum.ru/vba/thread1469806.html
VBA Узнавать количество строк в абзаце, оформленном определенным стилем http://www.cyberforum.ru/vba/thread1469797.html
Подскажите, пожалуйста, как узнавать количество строк в абзаце, оформленном определенным стилем абзаца. Хочу написать макрос, который будет искать абзацы с опр. стилем, высчитывать кол-во строк и в...
VBA Сравнение столбцов, при совпадении переместить столбцы на новый лист Помогите решить. Есть 1 столбец с числовыми данными, есть 2 столбец с такими же числовыми данными, и есть еще 5 столбцов просто с данными. задача сравнить 1 столбец со 2 на совпадение, если... http://www.cyberforum.ru/vba/thread1469712.html
pashulka
3229 / 1728 / 726
Регистрация: 01.12.2010
Сообщений: 3,455
10.06.2015, 21:07 0

Файлы mht сохранить как docx

10.06.2015, 21:07. Просмотров 1372. Ответов 11
Метки (Все метки)

Ответ

Visual Basic
1
2
3
4
5
6
7
8
9
10
Private Sub SaveHTMLtoDoc()
    Dim iCount%, objDoc As Word.Document
    For iCount = Documents.Count To 1 Step -1
        Set objDoc = Documents(iCount)
        If LCase(objDoc.Name) Like "*.mht" Then
           objDoc.SaveAs Replace(objDoc.FullName, ".mht", ".docx")
           objDoc.Close 'False
        End If
    Next
End Sub
P.S. Если существует вероятность, что текст ".mht" может встречаться более одного раза, то можно просто отбросить последние три символа в имени файла и полученный результат об'единить (& или +) с "docx"

Вернуться к обсуждению:
Файлы mht сохранить как docx
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.06.2015, 21:07

как сделать MHT файлы?
Здравствуйте! Делаю электронный учебник через html. Прописывать теги в таком большом количестве...

Как сохранить Word файл (docx) в БД SQL Server
Делаю БД для хранения docx файлов БД SQL MS SERVER 2005 Как вставить в таблицу docx Помогите...

Как сохранить текст из RichTextBox в файл doc или docx?
Всем привет! Как сохранить текст из RichTextBox в файл doc или docx?

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.