msgbox в vba примеры

Ответ от MBlood[гуру]
Sub йцу ()
Dim c As Integer
' для ввода можно использовать стандартный метод inputbox
с = InputBox("Введите значение", "Заголовок", 0)
' для вывода используется Msgbox
MsgBox c
End Sub
Метод InputBox в VBA
При работе с VBA неоценимую помощь может оказать использование метода InputBox в качестве окна ввода данных для получения информации от пользователя.
Метод имеет следующий общий вид:
object.InputBox(Запрос, Заголовок, По_умолчанию, Слева, Сверху, Справка, Раздел, Тип)
•Запрос – указывает текст, отображаемый в окне ввода (обязательный пара-метр) .
•Заголовок – определяет заголовок окна ввода (необязательный параметр) .
•По_умолчанию – задает значение, которое отображается в окне ввода по умолчанию (необязательный параметр)
•Слева, Сверху – определяет координаты верхнего левого угла окна ввода на экране (необязательный параметр) .
•Справка, Раздел – указывает файл и раздел в справочной системе (необяза-тельный параметр) .
•Тип – указывает код типа данных, который будет возвращаться методом (не-обязательный параметр) .
Пример. Метод InputBox является достаточно гибким. Использование суммы значений позволяет возвратить несколько типов данных. Например, для отображения окно ввода, которое принимает текстовый или чис¬ловой тип данных, установим код в значение 3 (т. е. 1+2 или "число" + "текст"). Следующая процедура вычисляет сумму двух чисел, если вводится числовые данные, и конкатенацию, если вводится текстовые данные.
Sub Subjects4_Prog3()
Dim A As Integer, B As Integer
A = Application.InputBox(Prompt:="Введите данные", Type:=3)
B = Application.InputBox(Prompt:="Введите данные", Type:=3)
S = A + B
MsgBox S
End Sub
MsgBox же позволяет вывести на экран диалоговое окно с определенным сообщением
MsgBox c, vbOKOnly, "Значение с"
с - возвращаемое значение,
vbOkOnly - тип диалогового окна
Значение с - заголовок окна