Программа вами написана? Можно было впилить кнопку в меню. Но если печать не из офиса - скриптом будет проще (например vbs).
Sub FileHandling(folder)
Dim cnt, file, ObjWord
Set ObjWord = CreateObject("Word.Application")
' ObjWord.Visible = True ' Debug
For Each file In folder.Files
If "docx" = LCase(fso.GetExtensionName(file)) Then
With ObjWord.Documents.Open(file.Path)
' Do Something... '
.Close False
End With: cnt = cnt + 1
End If
Next
ObjWord.Quit: Set ObjWord = Nothing
End Sub
Dim fso, folder
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(fso.GetAbsolutePathName(".")) ' Current folder '
FileHandling(folder)
Set fso = Nothing
По указанной мной ссылке есть Диаграмма xyY CIE 1931, по которой белый цвет можно получить из 2-х цветов. Только разложить его на "цвета радуги" уже не получится. Сейчас индекс цветопередачи ТМ-30-15 получают из 99 цветовым оттенкам.
Движок интересный, шаблоны ужасные. Мне только у Al3xandr3 понравился.
У движка предусмотрена форма обратной связи? Хотя, зачем я спрашиваю, - вы им не пользуетесь.
В русском языке есть слова с 2-мя: приставками, корнями, суффиксами и даже окончаниями. Без словаря не обойтись. Чтобы не углубляться в нетривиальную задачу я реализовал алгоритм Стеммер Портера для выделения основы слов.
ЗЫ: По вопросу реализации не тормозного VBA - советы есть у меня в профиле.
Set WS = WB.Worksheets("Ëèñò1")
Демонический копипаст. Вот кому-то заняться нечем, - такие задания раздавать.
Верный путь C:\Program Files\Microsoft Office 2010\MEDIA\OFFICE14\AUTOSHAP для файлов *.wmf.