Задача: сделать смету на ремонтно-строительные работы с автоматическим обновлением цен на материалы
Решение: пишем макрос в Excel Sub getprice() Название макроса Set ws = ThisWorkbook.Worksheets("список") Присваиваем переменной ws значение листа "список" текущей рабочей книги (текущая - к которой прикреплён модуль VBA)
TotalRow = ws.UsedRange.Rows.Count Присваиваем переменной TotalRow значение количества использованных строк листа ws For i = 1 To TotalRow - 1 Начало цикла, начиная с 1 до количества использованных строк - 1 (-1 так как дальше мы адресуем ячейки с переменной i + 1) ...
Когда молодой Онегин отказался от традиции добавлять «-с» в знак вежливости и почтения, старожилы обиделись: Все дружбу прекратили с ним. "Сосед наш неуч; сумасбродит; <...>Он дамам к ручке не подходит; Все да да нет ; не скажет да-с Иль нет-с". Таков был общий глас." Они и не знали, что юному дворянину не пристало использовать «словоерс» (он же словоерик, он же словоер, он же Гоша, он же Гога). Потому как в столичных салонах словоерс из показателя вежливости уже превратился в признак самоунижения...