Question

Составьте
программу, проверяющую, что введенное число является четным или нечетным
На языке VBA

Answer 1

Sub test()
    Dim n As Long
    n = InputBox("Введите целое число")
    MsgBox IIf(n Mod 2 = 0, "Четное", "нечетное"), vbInformation
End Sub

Answer 2

Вводится на текущем листе Excel