1

Тема: Порядок слов наоборот

Можно ли как-нибудь реализовать замену прядка букв в словах?

2

Re: Порядок слов наоборот

Порядка букв в словах или слов в предложении?

3

Re: Порядок слов наоборот

Не так тему назвал. Букв в словах. Вот скрипт

Sub ReverseWords()
     Dim i As Long
     Dim OldString As Variant
     Dim RevText As Variant
     OldString = Split(Selection.Text, " ")
     For i = 0 To UBound(OldString)
         OldString(i) = StrReverse(OldString(i))
     Next
     RevText = Join(OldString, " ")
     MsgBox RevText
End Sub

Но он выводит текст в окне. Можно ли как то сделать, чтобы реверсировался сразу выделяемый текст?