[El Sanchez]

romby, батник для Office 2007 переделал (убрал ключ /f из параметров запуска winword.exe).

конвертит документы в формат .mht енто веб страница в одном файле, а как сделать чтобы сохраняла веб страницу с папкой я не знаю (енто в офисе 2007 меню-сохранить как-другие форматы-веб-страница (*.htm, *.html) »

В строке

Код:

oDoc.SaveAs Mid(sFileName, 1, InStrRev(sFileName, ".")) & "mht", wdFormatWebArchive, AddToRecentFiles:=False

замените:

mht на htm (расширение будущего файла)
wdFormatWebArchive на wdFormatHTML (константа свойства SaveFormat объекта FileConverter, означающая, что документ будет сохранен как веб-страница)

Список констант можно посмотреть здесь

P.S. Если исходные файлы не формата .rtf, то в строке

Код:

sFileName = Dir(sDir & Application.PathSeparator & "*.rtf")

*.rtf замените на нужное расширение.