162 прочтения · 4 года назад
Пишем автоматически обновляемую смету в Excel VBA
Задача: сделать смету на ремонтно-строительные работы с автоматическим обновлением цен на материалы Решение: пишем макрос в 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) ...
136,7K прочтений · 3 года назад
«Извольте-с». Что на самом деле означала буква «-с» в конце слов? Сейчас такого не встретишь!
Когда молодой Онегин отказался от традиции добавлять «-с» в знак вежливости и почтения, старожилы обиделись: Все дружбу прекратили с ним. "Сосед наш неуч; сумасбродит; <...>Он дамам к ручке не подходит; Все да да нет ; не скажет да-с Иль нет-с". Таков был общий глас." Они и не знали, что юному дворянину не пристало использовать «словоерс» (он же словоерик, он же словоер, он же Гоша, он же Гога). Потому как в столичных салонах словоерс из показателя вежливости уже превратился в признак самоунижения...