VBNet - Форум - OpenOffice.org

Вопрос: OpenOffice.org Добавлено: 17.01.06 13:08

Автор вопроса: lostdragon2000 | Web-сайт: www.shatki.info

Есть код на VB для работы с MS документами:

Dim tipot As String

tipot = App.Path & "/blanks/os.doc"

Dim Wrd As Word.Application
Dim WrdDc As Object
Set Wrd = New Word.Application
Set WrdDc = Wrd.Documents.Open(tipot, , False)
WrdDc.Application.Visible = True

Wrd.Selection.Find.ClearFormatting
    Wrd.Selection.Find.Replacement.ClearFormatting
    'Íîìåð
     With Wrd.Selection.Find
        .Text = "nn"
        .Replacement.Text = "ZZZ"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = True
        .MatchWholeWord = False
        .MatchWildcards = False
       ' .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Wrd.Selection.Find.Execute Replace:=wdReplaceAll

    Wrd.Selection.Find.Execute Replace:=wdReplaceAll

Смысл этого кода в том, что он открывает документ находящейся в /blanks/os.doc
Находит в нем строку "nn" и заменяет ее на "ZZZ"

Вопрос: Как тоже самое реализовать не используя MSO а используя OpenOffice.Org?

Помогите кто может...
Ответить

Ответы Всего ответов: 3

Номер ответа: 1 Автор ответа: User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302	Профиль \| \| #1	Добавлено: 17.01.06 13:26
	Там точно также можно записывать макросы... Ответить

Номер ответа: 2 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860	Web-сайт: mc-black.narod.ru/dzp.htm Профиль \| \| #2	Добавлено: 17.01.06 14:05
	У многих OpenOffice не установлен.. Ответить

Номер ответа: 3 Автор ответа: VerhoLom Вопросов: 20 Ответов: 285	Профиль \| \| #3	Добавлено: 21.01.06 16:53
	Хрень это и все! Пользовались мы им. Потом выкинули и мусарке сказали спасибо, что взяла! Ответить

Страница: 1 |