Microsoft Word, Excel, Access, Язык HTML для студентов гуманитарных факультетов. Бахтиева Л.У - 46 стр.

UptoLike

46
введите с клавиатуры число лет хранения вклада, например 8,
щелкнув на галочку в строке формул, завершите ввод,
остановите запись.
2. Просмотрите программу: Сервис Макрос выберите свой
макрос Изменить.
Sub Доход
Range("B3").Select
ActiveCell.FormulaR1C1 = k
End Sub
3. Внесите изменения в программу, написав цикл для того,
чтобы наблюдать рост столбика Доход.
Замечание 1. Если изменения не доступны, дайте команду
Сервис Макрос Безопасность Низкая. Закройте, сохраните
и вновь откройте книгу.
Замечание 2. Комментарии в программе начинаются с
апострофа, выделяются зеленым цветом и не влияют на работу
программы. Ошибки выделяются красным цветом.
Sub Доход
For k = 0 To 8
Range("B3").Select
ActiveCell.FormulaR1C1 = k
Next k
End Sub
– введите с клавиатуры число лет хранения вклада, например 8,
– щелкнув на галочку в строке формул, завершите ввод,
– остановите запись.
    2. Просмотрите программу: Сервис – Макрос – выберите свой
макрос – Изменить.


    Sub Доход
    Range("B3").Select
    ActiveCell.FormulaR1C1 = k
    End Sub


    3. Внесите изменения в программу, написав цикл для того,
чтобы наблюдать рост столбика Доход.
    Замечание 1. Если изменения не доступны, дайте команду
Сервис – Макрос – Безопасность …  Низкая. Закройте, сохраните
и вновь откройте книгу.
    Замечание 2.     Комментарии      в   программе   начинаются   с
апострофа, выделяются зеленым цветом и не влияют на работу
программы. Ошибки выделяются красным цветом.


    Sub Доход
    For k = 0 To 8
    Range("B3").Select
    ActiveCell.FormulaR1C1 = k
    Next k
    End Sub


                                 46