Страница 1 из 1

Как заменить скобку и обычный дефис на скобку и нерозрывний дефис

Добавлено: 20 авг 2010, 17:03
jaroslav
Всем добрый день.
Вопрос в теме.
Делаю так в Excel:

Код: Выделить всё

With Word.application.Selection.Find
        .Text = "(-"
        .Replacement.Text = "(" & Chr(30)
        .Forward = True
        .Execute Replace:=wdReplaceAll
End With
Но у меня ничего не получается. Хотя если этот же макрос выполнять в Word, все работает.
Нужно сделать программу в Excel для замены скобки и обычного дефиса на скобку и нерозрывний дефис в Word.

Re: Как заменить скобку и обычный дефис на скобку и нерозрывний дефис

Добавлено: 20 авг 2010, 19:26
jaroslav
Ребята, разобрался. Я все делал правильно, только курсор в ворде стоял в конце документа, поэтому замена не происходила. Тему можно считать закрытой.