Изменить порядок слов в документе на обратный - Microsoft Office Word

arthur_92 · 06.06.2011, 18:51

Помогите пожалуйста еще с вот этой задачей:Изменить порядок слов в документе на обратный.Заранее спасибо.

Казанский · 07.06.2011, 00:14

Примерно так:

Код:

Sub bb()
Dim y, z
For Each y In Split(ActiveDocument.Range.Text)
    z = y & " " & z
Next
Selection.WholeStory
Selection.TypeText RTrim(z)
End Sub

06.06.2011, 18:51	#1
arthur_92 Регистрация: 02.06.2011 Сообщений: 3	Изменить порядок слов в документе на обратный Помогите пожалуйста еще с вот этой задачей:Изменить порядок слов в документе на обратный.Заранее спасибо.

07.06.2011, 00:14	#2
Казанский Старожил Регистрация: 31.12.2010 Сообщений: 2,133	Примерно так: Код: `Sub bb() Dim y, z For Each y In Split(ActiveDocument.Range.Text) z = y & " " & z Next Selection.WholeStory Selection.TypeText RTrim(z) End Sub` exceleved@yandex.ru Яндекс.Деньги: 410011500007619

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Поменять порядок следования символов на обратный	ProAndrew	Паскаль, Turbo Pascal, PascalABC.NET	1	10.12.2010 14:29
Обратный порядок	G. J. Cezar	Общие вопросы C/C++	2	22.10.2010 15:10
Обратный алфавитный порядок	~GVS	Помощь студентам	0	21.04.2010 15:54
Поменять порядок следования отрицательных элементов на обратный	JeyKip	Общие вопросы C/C++	1	14.01.2010 01:23
Обратный порядок вывода (системы счис.)	forsaken66	Общие вопросы C/C++	2	17.10.2009 01:45