все правки добавляются не друг за другом а относительно исходной версии текста
str = "Это текст, часто используемый в вэб-дизайне
Юзверь1: str.replace("Это текст","То предложение")
Юзверь2: str.replace("текст","словосочетание")
Не понятно, как будут расставляться приоритеты.удалять/восстанавливать правки по пользователямВ Word'е есть кнопка Рецензирование -> Исправления, но важно её не отключать и не применять правки до формирования конечного документа.
методом шифрования скорость перебора паролей не превышает 20 в секунду
считывать содержимое ячейки xls
цикл перебора всех файлов xls в определенной папке: для каждого файлаВы пароли в файле храните? Опасно.
Set fl = CreateObject("Excel.Application")
With fl.Workbooks.Open(oFile)
' Do Something... '
.Close
End With
' Пример вставки рисунка
' Word
Selection.InlineShapes.AddPicture FileName:=Path, SaveWithDocument:=True
' Excel
ActiveSheet.Pictures.Insert(Path)