Как выйти из цикла - VBA
Формулировка задачи:
Помогите пож дописать макрос! Нужно найти номер позиции первой буквы кириллицы в строке как например mom мама
Листинг программы
- Sub Find_Pos()
- For n = 1 To Len(ActiveCell)
- lett = Mid(ActiveCell, n, 1) 'MsgBox Mid(ActiveCell, N, 1)
- If lett Like "[а-я]" Then Exit For
- pos = InStr(st, ActiveCell, lett)
- MsgBox "Letter is " & lett & " Posision = " & pos
- 'End If
- Next n
- End Sub
Решение задачи: «Как выйти из цикла»
textual
Листинг программы
- If lett Like "[А-Яа-яЁё]" Then MsgBox "Letter is " & lett & " Posision = " & n: Exit For
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
