Уважаемые эксперты, помогите пожалуйста. Нужно составить макрос в Word, который сравнивает совпадают ли первое и последнее слова в строке. Строка вводится с клавиатуры. В результате должна появляться надпись - совпадают; не совпадают.

Ответ

Автор - BobbyFresnel

Sub example()

Dim a() As String

a = Split(InputBox("Введите строку"))

If a(0) = a(UBound(a)) Then

MsgBox "Совпадают"

Else

MsgBox "Не совпадают"

End If

End Sub

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.