Создать макрос, который пишет парное или непарное число - VBA

Формулировка задачи:

Надо создать макрос, который в один столбец генерирует случайные числа от 1 до 20. А в соседнем столбце писалось бы, чётное это число или нечётное. Пользователь задаёт количество рядов для чисел. Первое число появляется в названной ячейке. 1 - нечётное 2 - чётное 5- нечётное 10 - чётное Что-то типо такого Спасибо!

Решение задачи: «Создать макрос, который пишет парное или непарное число»

textual
                            Листинг программы 
                        
 [algus1].Cells(J, 1) = I
 [algus1].Cells(J, 2) = IIf(I Mod 2 = 0, "чётное", "нечётное")

Оцени полезность:

10 голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы