Pegas
Members
-
Зарегистрирован
-
Посещение
-
Нет. Облизбирком четырьмя зданиями правее. По поводу ответа, можно поподробнее ?
-
А машин не многовато, для такого плана ?
-
В Твери прошли выборы 29 и 49, победа КПРФ над ЕР (1.03.2009). Сегодня случайно заметил кортеж из 5ти машин, + 1 ДПС с мигалкой. Номера московские. 3 волги и 2 форда на вскидку. Чёрные. Номера белые 177 или 77 не разглядел, буквы то же. Парковка 30-сек, из форда 2 человека быстро вошли в здание Администрации Тверской области. Зелёная форма, фуражка, красный шеврон на рукаве. К чему бы это. Опять что-то заваривается ? Никто не в курсе из каких структур могут быть люди ? В волгах, сложилось впечатление были только водители.
-
для Doc простым скриптом на MSword VBA и всё :) Вот такой макрос, в форме с кнопкой btnGO ' Преобразование файлов Private Sub btnGO_Click() Dim pDoc As String Dim pRtf As String Dim fso As Object, inFolder As Object pDoc = "C:\!In": pRtf = "C:\!Out" Set fso = CreateObject("Scripting.FileSystemObject") Set inFolder = fso.GetFolder(pDoc) Application.DisplayAlerts = wdAlertsNone For Each fl In inFolder.Files On Error GoTo PROC_ERR Documents.Open FileName:=fl.Path, ConfirmConversions:=False, _ ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _ PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _ WritePasswordTemplate:="", Format:=wdOpenFormatAuto ActiveDocument.SaveAs FileName:=pRtf & "\" & fl.Name & ".rtf", FileFormat:=wdFormatRTF ActiveDocument.Close (False) PROC_ERR: Next Application.DisplayAlerts = wdAlertsAll End Sub Делаем папки "C:\!In" и "C:\!Out" в C:\In файлы, только doc :) Сделано но офисе XP, ругается на файлы с наличием картинок :( Ну скинуть в одну папку, проще в тотал коммандере :)
-
Regular Expressions изучал по этому http://www.regular-expressions.info/reference.html
-
2Роман Символ переноса строки в Word - ^p 1. сделать маленькую надстройку в Word'е. 2. записать макрос и отредактироваить его в VBA 3. действительно писать парсер, под какой либо формат текста, лучше RTF. ПМСМ 1 вариант, на основе 2го найпростейший. Про 200 Мб текста не знаю, но 600 страниц текста обработка через комманду VBA Find довольно быстрая. PS. Если я правильно понял задачу.
-
чуть добавлю - Alt + PrntScrn копирует в память только активное окно, с видеофайлами, насколько помню возникают проблемы.