• VВA. Использовать оператор цикла For. В диапазоне ячеек A1: A20 находятся 20 чисел. Составьте программу, которая копирует данные числа в колону B (клетки от B1 до B20) следующим образом:
    - Числа из ячейки A1 скопировать в ячейку B1;
    - Числа из ячейки A20 скопировать в ячейку B2;
    - Числа из ячейки A2 скопировать в ячейку B3;
    - Числа из ячейки A19 скопировать в ячейку B4;
    - Числа из ячейки A3 скопировать в ячейку B5;
    - Числа из ячейки A18 скопировать в ячейку B6;
    и так далее (в начале надо скопировать первое число, потом последнее, потом второе число, потом предпоследние, потом третье и тд.).

Ответы 4

  • Не мог ли бы вы на словах пояснить как этот код работает?
    • Автор:

      karmaxsw6
    • 5 лет назад
    • 0
  • Берет и копирует. Первый десяток в прямом порядке, второй - в обратном. Не знаю, как еще пояснить работу обычного цикла...
  • Становитесь в макрос курсором (в любое место) и по клавише F8 выполняете строки по одной за нажатие. И смотрите каждый раз на лист Экселя. Все и увидите.
  • Sub aaa()    For i = 1 To 10        Cells(2 * i - 1, 2) = Cells(i, 1)    Next i    For i = 20 To 11 Step -1        Cells((21 - i) * 2, 2) = Cells(i, 1)    Next iEnd Sub
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years