Уважаемые эксперты, помогите пожалуйста. Нужно составить макрос в Word, который сравнивает совпадают ли первое и последнее слова в строке. Строка вводится с клавиатуры. В результате должна появляться надпись - совпадают; не совпадают.
Simba2017:
в ворде есть макросы?
Ответы
Ответ дал:
1
Sub example()
Dim a() As String
a = Split(InputBox("Введите строку"))
If a(0) = a(UBound(a)) Then
MsgBox "Совпадают"
Else
MsgBox "Не совпадают"
End If
End Sub
Вас заинтересует
4 месяца назад
6 месяцев назад
6 месяцев назад
2 года назад
7 лет назад