iText$ = InputBox("Введите необходимый текст", "")
If iText$ <> "" Then
'Здесь необходимые действия
Else
Exit Sub
End If
Помогите с Inputbox
у нас в прописанных макросах при их запуске сначала вызываеться InputBox, введенное значение записываеться в определенную ячейку и выполнение макроса идет дальше. На Инпутбоксе есть две кнопки "Да" и "Нет", так вот какую кнопку не нажми выполнение макроса все равно осушествляеться. Как сделать так чтоб при нажатии на "нет" выполнение макроса прерывалось и все возвращалось в первоначальное состояние?
Я понимаю что есть такой оператор Answer...
Я понимаю что есть такой оператор Answer...
Код:
Код:
iText$ = InputBox("Введите необходимый текст", "")
If iText$ = "" Then Exit Sub
Здесь необходимые действия
If iText$ = "" Then Exit Sub
Здесь необходимые действия
Код:
iText$ = InputBox("Введите необходимый текст", "")
If Len(iText$) > 0 Then
'Здесь необходимые действия
Else
Exit Sub
End If
If Len(iText$) > 0 Then
'Здесь необходимые действия
Else
Exit Sub
End If
Код:
iText$ = InputBox("Введите необходимый текст", "")
If Len(iText$) = 0 Then Exit Sub
Здесь необходимые действия
If Len(iText$) = 0 Then Exit Sub
Здесь необходимые действия
P.S. В Excel'е есть ещё Application.Inputbox , но там немного по другому, ибо этот метод(функция) после нажатии кнопки Отмена/Закрыть возвращает False(Ложь)