Задача: сделать смету на ремонтно-строительные работы с автоматическим обновлением цен на материалы Решение: пишем макрос в 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) ...

Пользователи Гранд-сметы привыкли экспортировать сметы из екселевского файла в программу обычной операцией копирования. Но новая форма сметы по Методике 421/пр затруднила выполнение данной задачи из-за большого количества лишних строк. Как же выйти из положения? Приведу на примере небольшой сметы. Выделяем необходимый для экспорта фрагмент сметы и копируем его. Я это делаю клавишами Ctrl+C. В программе создаем файл сметы и вставляем выделенный фрагмент (Ctrl+V). Передвигаем столбцы с единицей измерения и объемом в нужное место...