Тема: Порядок слов наоборот
Можно ли как-нибудь реализовать замену прядка букв в словах?
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Можно ли как-нибудь реализовать замену прядка букв в словах?
Порядка букв в словах или слов в предложении?
Не так тему назвал. Букв в словах. Вот скрипт
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
Но он выводит текст в окне. Можно ли как то сделать, чтобы реверсировался сразу выделяемый текст?
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться