Отключить обновление документа? [РЕШЕНО]

Автор Alex, 6 ноября 2010, 08:40

0 Пользователи и 1 гость просматривают эту тему.

Рыбка Рио

Кстати, это реальный баг, даже диалог поиска и замены в этом случае не работает (выбрать формат цвет шрифта красный 4). Пишет "слово заменено столько-то раз" и ничего не заменяет.

[вложение удалено Администратором]
ubuntu 12.04 + LibO3.6.0

Рыбка Рио

ubuntu 12.04 + LibO3.6.0

Alex

Интересное кино получается. Написал аналог для MS Word, примерно так:

Sub ChgArrValues(ArrPair)
Dim i As Integer
  With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Font.Color = wdColorRed
      .Replacement.Font.Color = wdColorBlack
      .Forward = True
      .Wrap = wdFindContinue
      .Format = True
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
  End With
  For i = 0 To UBound(ArrPair)
    Selection.Find.Text = ArrPair(i, 0)
    Selection.Find.Replacement.Text = ArrPair(i, 1)
    'Selection.Find.Replacement.Text = IIf(ArrPair(i, 1) = "", " ", ArrPair(i, 1)) 'А так работает!
    Selection.Find.Execute Replace:=wdReplaceAll
  Next
End Sub


Так вот то же самое - красный текст только перекрашивает в чёрный, но не заменяет. В Office 2003 по крайней мере.
Неужели у Билли тот же самый косяк? Может просто так задумано почему-то?