Изучаем Excel и не только

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

Задача: выгрузить объявления с Avito Решение: Устанавливаем бесплатное расширение WebScraper для Chrome (по ссылке) Переходим в браузере на нужную страницу Avito (для примера, эта страница) Вызываем контекстное меню правой кнопкой мыши>Просмотреть код Кликаем "Web Scraper" Create New Sitemap>Create Sitemap Sitemap Name - называете, как вам хочется Start URL: нажимаем "Последняя" в самом низу страницы Копируем из адресной строки браузера адрес Вставляем адрес в поле "Start URL" в следующем формате: https://www...