Полезные макросы Excel для автоматизации рутинной работы с примерами применения для разных задач.
Примеры макросов для автоматизации работы
Макросы для фильтра сводной таблицы в Excel.
Как автоматизировать фильтр в сводных таблицах с помощью макроса? Исходные коды макросов для фильтрации и скрытия столбцов в сводной таблице.
Макрос для создания сводной таблицы в Excel.
Как автоматически сгенерировать сводную таблицу с помощью макроса? Исходный код VBA для создания и настройки сводных таблиц на основе исходных данных.
Макросы для изменения формата ячеек в таблице Excel.
Как форматировать ячейки таблицы макросом? Изменение цвета шрифта, заливки и линий границ, выравнивание. Автоматическая настройка ширины столбцов и высоты строк по содержимому с помощью VBA-макроса.
Макрос для копирования и переименования листов Excel.
Как одновременно копировать и переименовывать большое количество листов одним кликом мышкой? Исходный код макроса, который умеет одновременно скопировать и переименовать любое количество листов.
Сборник готовых макросов
Приветствую на странице, которую каждый начинающий VBA-программист просто обязан добавить в закладки. Сейчас расскажу почему.
Макросы могут сэкономить массу времени. Можно автоматизировать небольшие задачи (ссылка на примеры), или создавать целые проекты автоматизации. Нажал кнопку и макрос выполнил работу целого отдела (вот я вообще не преувеличиваю).
Если Вы не знаете, что такое макрос в Excel и для чего они нужны, то рекомендую начать обучение с бесплатного самоучителя. Сборник готовых примеров, конечно, тоже поможет, но лучше начать с основ, а потом уже переходить к практике.
Моя история
Я ещё со школы начал изучать VBA. Читал книжки, пользовался макрорекордером (подсматривал код, изменял под себя).
Когда ты школьник, то верх мастерства сделать калькулятор или игру. Стал студентом — разработал инвестиционный проект строительства свиноводческого комплекса (вводишь пару основных цифр и программа говорит какая мощность комплекса нужна, сколько нужно людей и денег, плюс тонную документов с деталями цикла производства и план-график выхода на проектную мощность).
Это всё, конечно, интересно и круто, но не сравнить с написанием макросов для решения реальных бизнес-задач.
Представьте на минуту, что всю вашу рутину:
- привести таблицу в «нормальный» вид;
- собрать данные из нескольких файлов в один;
- отфильтровать простыню из данных по нескольким критериям;
- построить сводную таблицу, график и отправить боссу
- тонна аналогичных скучных задач.
можно поручить Excel. ОДИН РАЗ прописать логику с помощью VBA и всё! Да, я знаю, что написание макроса иногда может занять неделю, а то и месяц. Но сколько вы каждый день/неделю/месяц тратите время на ерунду?
Я сам далеко не сразу узнал всё про макросы. Приходилось много читать скучных книг с примерами, которые даже не понимал куда применить, собирать по крупицам информацию в интернете. Да что там говорить — я и сейчас продолжаю изучать VBA.
Про сборник
Изначально я не хотел никому и не при каких обстоятельствах показывать сборник. Максимум ученикам и то, какую-нибудь урезанную версию (т..к постоянно добавляю новые коды). С рождением сына я пересмотрел свою позицию и захотел оставить след в истории (пафосно звучит, ну и пусть).
На поиск всех этих примеров я потратил слишком много времени, и будет круто, если сэкономлю ваше и вы сможете уделить его действительно важным вещам.
Если вы считаете, что что-то должно быть в списке, просто оставьте комментарий. Как только добавлю код — удалю комментарий, а про вас напишу в статье.
В этой огромной статье я собрал уже более 200 макросов, для удобства разбил их по группам.
Вы сможете использовать эти коды, даже если до этого не использовали VBA.
Работа с Excel файлами (WorkBook)
- Как создать файл Excel с помощью VBA
- Как сохранить файл в Excel при изменении определенной ячейки или диапазона
- Как сохранить файл в Excel перед закрытием
- Как защитить лист в книге перед закрытием
- Как снятие защиту с листа при открытии Excel файла
- Как открыть Excel файл на нужном листе
- Как открыть Excel файл, определенный пользователем
- Как определить, открыт ли Excel файл
- Как определяем, существует ли Excel файл в папке
- Как обновить все связи в открытых Excel файлах
- Как закрыть сразу все Excel файлы
- Как открыть все Excel файлы в папке
- Как распечатать все Excel файлы в папке
- Как не дать закрыть Excel файл до тех пор, пока не заполнит ячейку
- Как создать резервную копию текущего Excel файла с сегодняшней датой
Назад к списку тем
Работа с листами Excel файла (WorkSheets)
- Как добавить новый лист и присвоить имя
- Как удалить все листы, кроме активного
- Как скрыть все, кроме активного рабочего листа
- Как отобразить все листы книги
- Как переместить рабочие листы книги
- Как сортировать листы по названию
- Как сгруппировать листы по цвету ярлычка
- Как скопировать лист в новый Excel файл
- Как создать новый Excel файл для каждого листа
- Как распечатать листы
- Как защитить все листы
- Как снять защиту со всех листов
- Как создать оглавление со списком листов
- Как изменить масштаб листа с помощью двойного клика
- Как выделить столбец активной строки на листе
Назад к списку тем
Работа с диапазонами (Range)
Эта часть посвящена диапазонам: их выбору, изменению, скрытию и т. д.
- Как выбрать и изменить форматирование диапазона
- Как создать и выбрать именованный диапазон
- Как сделать перебор диапазона ячеек
- Как выбрать и форматировать диапазон
- Как вставить пустые строки в диапазон
- Как отобразить все скрытые строки и столбцы
- Как удалить пустые строки
- Как удалить пустые столбцы
- Как отобрать и отформатировать все формулы на листе
- Как найти первую пустую строку или столбец
- Как применить дополнительный цвет заливки
- Как отсортировать диапазоны по двойному щелчку
- Как ограничить диапазон прокрутки в той или иной области
- Как автоматически задать область печати листа
Назад к списку тем
Макросы для работы с данными
Эта часть посвящена управлению данными: их очистке, форматированию и т. д.
- Как скопировать и вставить диапазон
- Как преобразовать все формулы в диапазон с значениями
- Как преобразовать текстовые значения в числовые
- Как преобразовать тире в минус
- Как удалить лишние пробелы из всех ячеек в диапазоне
- Как отсечь слева 5 знаков в каждой ячейке диапазона
- Как добавить в ячейку недостающие нули
- Как заменить пустые ячейки нулём
- Как добавить текст в начало или конец ячейки
- Как создать макрос преобразования данных
- Как очистить данные от непечатаемых символов
- Как выделить дубликаты в диапазоне данных
- Как скрыть повторяющиеся строки
- Как выборочно скрыть стрелки автофильтра
- Как скопировать отфильтрованные строки в новый Excel файл
- Как создать новый лист для каждого элемента в автофильтре
- Как показать отфильтрованные столбцы в строке состояния
Назад к списку тем
Макросы для сводных таблиц
- Как создать обратную совместимость сводной таблицы
- Как обновить все сводные таблицы книги
- Как создать список всех сводных таблиц книги
- Как создать все сводные таблицы, используя единый кэш
- Как скрыть все промежуточные итоги в сводной таблице
- Как изменить названия всех полей сводной
- Как принудительно суммировать значения для всех полей сводной
- Как применить числовой формат для всех элементов данных
- Как сортировать поля сводной в алфавитном порядке
- Как применить пользовательскую сортировку к элементам данных
- Как поставить защиту на сводную таблицу
- Как применить ограничения сводного поля
- Как автоматически удалять листы с детализацией
- Как распечатать сводную таблицу для каждого значения фильтра
- Как для каждого элемента фильтра создать новый Excel файл
- Как подготовить диапазон данных для сводной таблицы
Назад к списку тем
Макросы для графиков
- Как изменить размер диаграмм на рабочем листе
- Как привязать график к определенному диапазону
- Как создать набора бессвязных диаграмм
- Как распечатать всех диаграммы на рабочем листе
- Как отметить первое и последнее значение на графике
- Как сопоставить цвет диаграммы и исходных данных
- Как сопоставить цвет точек графика и исходных данных
Назад к списку тем
Макросы для отправки писем из Excel
- Как отправить Excel файл почтой (как вложение)
- Как отправить диапазон значений в качестве вложения
- Как отправить один листа файла в качестве вложения
- Как отправить письмо со ссылкой на наши файлы
- Как разослать письма с добавлением адресов в наш список контактов
- Как сохранить все вложения в отдельной папке
- Как сохранить определенные вложения в папку
Назад к списку тем
Макросы для работы с Access
- Как выполнить запрос Access из Excel
- Как запустить макрос Access из Excel
- Как открыть отчет Access из Excel
- Как открыть форму Access из Excel
- Как сжать базу данных Access из Excel
Назад к списку тем
Макросы для работы с MS Word
- Как отправить данные из Excel в Word документ
- Как сделать слияние с Word документом
Назад к списку тем
Макросы для работы с PowerPoint
- Как отправить данные Excel в PowerPoint
- Как отправить график из Excel в PowerPoint
- Как преобразовать рабочую книгу в презентацию PowerPoint
Назад к списку тем
Если Вы не сильны в программировании, но, при этом, Вам необходимо реализовать какую-либо задачу, выходящую за рамки стандартных функций и команд MS Excel, можно поискать решение в интернете. Решение, скорее всего, найдется в виде VBA кода, который необходимо скопировать и вставить в Вашу рабочую книгу, потом каким-то образом заставить этот код работать на Вас, в этой статье я расскажу, как это сделать.
Файл | Описание | Размер файла: | Скачивания |
---|---|---|---|
14 Кб | 2798 |
Рассмотрим два примера:
Ищем и используем команду
Ищем и используем функцию
1. Ищем и используем команду
Например, нам необходима команда, которая бы вставляла в выделенные ячейки цифру «1». Запускаем поисковик, набираем поисковую фразу, получаем результаты, начинаем просматривать, находим код примерно в таком виде:
Sub Вставка1() Dim q As Object On Error Resume Next Set q = Cells For Each q In Selection q = 1 Next q End Sub
Выделяем данный код (без нумерации строк, начиная со слова Sub) и нажимаем Ctrl+C. Переходим в свою рабочую книгу MS Excel и нажимаем сочетание клавиш Alt+F11, у вас откроется окно редактора VBA:
В левом окне «Project — VBA Project» выбираем (щелкаем мышкой) нашу рабочую книгу, в которую необходимо вставить макрос, например, «VBAProject (Книга2)»:
Я не вижу окна «Project — VBA Project».
В пункте меню «Insert» выбираем «Module»:
В левом окне «Project — VBA Project» у вас должна появиться новая папка «Modules» и в ней новый объект «Module1»:
Переходим курсором в правое «Большое» поле для ввода и нажимаем Ctrl+V, скопированный макрос вставиться в модуль:
У меня в коде «????????«
После чего закрываем редактор VBA и возвращаемся в рабочую книгу.
Если вы работаете в MS Excel 2007, 2010 или 2013, вам необходимо будет сохранить вашу рабочую книгу как «Книга Excel с поддержкой макросов (.xlsm)»:
В MS Excel 2003 достаточно будет просто сохранить файл.
Чтобы выполнить скопированный в книгу макрос выделяем ячейки, в которые необходимо вставить «1», нажимаем в меню «Вид» кнопку «Макросы» и в выпавшем списке выбираем пункт «Макросы» или нажимаем сочетание клавиш Alt+F8:
Откроется диалоговое окно «Макрос», в списке макросов выбираем свой и нажимаем кнопку «Выполнить»:
Макрос выполнится — в выделенные ячейки вставиться «1»:
Чтобы макрос можно было запускать без лишних телодвижений, читайте статьи «Как сделать кнопку для запуска своего макроса?» и «Как назначить макросу сочетание клавиш?».
Макросы в MS Excel можно вставлять в следующие места:
- В Модуль, обычно вставляют код макросов, запуск которых будет производится по нажатию кнопки пользователем (как, например, в нашем случае) или код функций (формул);
- В Рабочий лист, обычно вставляют код макросов, запуск которых должен происходить автоматически в зависимости от действий пользователя или изменения данных в листе (поменялись данный, макрос выполнился);
- В Рабочую книгу, обычно вставляют код макросов, запуск которых должен происходить автоматически в зависимости от действий, производимых над книгой (файлом). Например, макрос, который запускается при открытии или закрытии книги, или при ее сохранении;
- Так же макросы могут быть частью пользовательской формы.
Обычно, человек, который публикует код, указывает, куда его необходимо вставить, в модуль, в лист или книгу.
Чтобы вставить код в Рабочий лист, в левом окне редактора VBA выберите соответствующий лист, щелкните по нему два раза левой кнопкой мышки, переместите курсор в правое поле ввода и вставьте код.
Для вставки кода в Книгу, выберите «ЭтаКнига»:
Давайте потренируемся. Вставьте код опубликованный ниже в «Лист1».
Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo a If Target = 2 Then VBA.MsgBox ("Ячейка " & Target.Address & " = 2") End If a: Exit Sub End Sub
Данный макрос выводит информационное сообщение если вы введете в любую ячейку листа «2».
Вернитесь в рабочую книгу, перейдите в «Лист1» и введите в ячейку «А1» цифру «2» и нажмите Enter, после чего у вас должно появиться следующее сообщение:
Если вы видите это сообщение, то вы все сделали правильно. Если нет, то вы вставили код куда-то не туда, повторите попытку.
При вставке кода, необходимо внимательно следить за тем, куда вы его вставляете. Это можно сделать посмотрев на то, что написано в заголовке окна редактора VBA:
2. Ищем и используем функцию
Находим в интернете VBA код функции, которая подсчитывает, например, количество слов в ячейке:
Public Function КолСловВЯчейке(Ячейка As Range) Dim q As Variant Application.Volatile q = VBA.Split(Application.WorksheetFunction.Trim(Ячейка.Value), " ") КолСловВЯчейке = UBound(q) + 1 End Function
Копируем код, нажимаем сочетание клавиш Alt+F11, откроется редактор VBA:
Добавляем новый модуль в свою книгу и в этот модуль вставляем скопированный код:
Закрываем редактор VBA и переходим в свою рабочую книгу. Создаем новый лист (необязательно) в ячейку A1 вводим текст «мама мыла раму». Встаем в ячейку, в которой хотим получить результат (количество слов), в меню «Формулы» нажимаем кнопку «Вставить функцию»:
В открывшемся окне «Вставка функции» в поле «Категория» выбираем «Определенные пользователем»
В списке доступных функций выбираем «КолСловВЯчейке», нажимаем «ОК»:
Вводим необходимые аргументы и нажимаем «ОК»:
Получаем результат:
Важно:
Если вы не сохраните книгу, в которую вставили макрос как «Книгу с поддержкой макросов», все модули с макросами удаляться и вам придется, потом, повторно проделывать всю эту работу.
Если при вставке макроса в модуль у вас вместо некоторого текста стоят красные знаки «????????«
Это значит, что у вас проблема с кодировкой, которая наблюдается с копированием Кириллического текста из некоторых браузеров. Чтобы победить эту проблему, попробуйте вставить скопированный код в пустой лист MS Excel, как «Текст в кодировке Unicode». Для этого перейдите в книгу MS Excel, выберите или создайте пустой лист, встаньте в ячейку «A1» и нажмите сочетания клавиш Ctrl+Alt+V. Должно будет появиться меню «Специальной вставки», выберите пункт «Текст в кодировке Unicode» и нажмите «OK».
Код должен будет вставиться в рабочий лист без знаков вопроса:
После этого, еще раз скопируйте вставленный в лист код, и вставить его уже в модуль.
Если вы не видите в редакторе VBA окна «Project — VBA Project», перейдите во вкладку меню «View» и в списке выберите пункт «Project Explorer» или нажмите сочетание клавиш Ctrl+R:
Добавить комментарий
EXCELTools VBA
Установочный файл надстройки — EXCEL Tools VBA
Excel Tools VBA – надстройка, дополняющая MS Excel уникальными инструментами, которая позволяет автоматизировать рутинные и монотонные операции в MS Excel
Основные функции:
- 42 пользовательские функции
- 54 различных инструмента для работы с книгой MS Excel
- инструменты для работы с листами активной книги
- инструменты для выполнения операций над ячейками листа
- прочие инструменты
ПЕРЕЙТИ К ДОКУМЕНТАЦИИ
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 3.6 от 20.11.2021
MACROTools VBA Excel
Установочный файл надстройки – MACRO Tools VBA
Инструмент автоматизации разработки макросов в редакторе VBE MS Excel
Основные функции:
- удаление паролей с проектов VBA, книг и листов Excel
- автоматическое форматирование кода, расстановка и удаление отступов в коде
- автоматическая нумерации строк кода
- микро подстройка элементов в формах
ПЕРЕЙТИ К ДОКУМЕНТАЦИИ
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 1.9 от 09.02.2022
MACROTools VBA Word
Установочный файл надстройки – MACRO Tools VBA
Инструмент автоматизации разработки макросов в редакторе VBE MS Word
Основные функции:
- удаление паролей с проектов VBA, документов Word
- автоматическое форматирование кода, расстановка и удаление отступов в коде
- автоматическая нумерации строк кода
- микро подстройка элементов в формах
ПЕРЕЙТИ К ДОКУМЕНТАЦИИ
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 1.8.3 от 09.02.2022
WORDTools VBA
Установочный файл надстройки — WORD Tools VBA
Надстройка автоматизации рутинных и монотонных операций в MS WORD
Основные функции:
- вставка прописью чисел различных форматов: финансовый, процентный, штуки
- вставка дат прописью на основе календаря
- вставка времени прописью
- авто форматирование текста на основе пользовательских настроек
ПЕРЕЙТИ К ДОКУМЕНТАЦИИ
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 1.5 от 09.02.2022
IMAGETools VBA
Установочный файл надстройки — IMAGE Tools VBA
Image Tools VBA — надстройка для импорта иконок, MS Office на листы Excel и получения их названия, содержит 7842 иконки для MS Office 2013 или более поздних версий Excel.
Основные функции:
- алфавитная галерея выбора иконок
- вставка иконки на лист книги Excel, в формате png
- использование название иконки для кода VBA
ПЕРЕЙТИ К ДОКУМЕНТАЦИИ
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 1.2 от 11.08.2020
STYLETools VBA
Установочный файл надстройки — STYLETools VBA
Надстройка автоматизации рутинных и монотонных операций по созданию презентаций на основе файлов Excel
Основные функции:
- автоматизация создания презентаций на основе файлов Excel
- настройка дополнительной пользовательской палитры
- инструмент пипетка для копирования цветов
Новая надстройка!
ПОДЕЛИТЬСЯ ССЫЛКОЙ НА НАДСТРОЙКУ
Version: 1.0
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой. После установки надстройки на ленту Excel добавится новая вкладка — VBA-Excel. Цель данной программы — расширить стандартные возможности Excel, добавив в него дополнительное количество функций и команд, сократить время выполнения однотипных действий и автоматизировать рутинную работу. На любую команду вы сможете назначить горячую клавишу чтобы быстро ей пользоваться.
Системные требования:
Windows XP | Vista | 7 | 8.1 | 10
Excel 2007 | 2010 | 2013 | 2016 |2019
Торрент Надстройка для Excel — Надстройка VBA-Excel 2.1.00 подробно:
Состав надстройки:
На сегодняшний день надстройка Excel содержит более 80 пользовательских функций, и более 25 макросов.
Ячейки и диапазоны
Макросы
Работа с файлами
Текстовые функции
Логические функции
Финансовые функции
Функции даты и времени
Математические функции
Ссылки и массивы
Статистические функции
Информационные функции
Что нового в версии:
Версия: 2100 от 26.08.2018
+Написали собственную функцию для склонения произвольных фраз — СКЛОНЕНИЕ_ФРАЗ.
До этого вы использовали функцию СКЛОНЕНИЕ, которая работала от вэб сервиса Морфер.ру и имела ограничение на количество использований. Старая функция также будет поддерживаться. Будем рады отзывам и комментариям работы новой функции чтобы сделать ее лучше.
Версия: 2064 от 06.08.2018
-Исправлена ошибка открытия файлов
Версия: 2063 от 02.08.2018
+Усовершенствовали функционал объединения листов
+Добавили возможность импортирования листов из файлов CSV с сохранением столбцов
-Исправили ошибки функционала Применить формулу
-Восстановлена работа функции КУРС
+Мелкие улучшения и оптимизация
Версия: 2062 от 20.11.2017
+Сделали отдельную функцию для склонения фамилий СКЛОНЕНИЕ_ФИО
-Скорректировали работу функции СУММАПРОПИСЬЮ
-Исправили ошибки функционала Применить формулу
-Скорректировали работу функции КУРС
-Скорректировли функционал вставки даты из календаря
Версия: 2061 от 07.10.2017
-Мы переехали на новый сайт Micro-Solution.ru
-Для корректной работы всех функций просьба обновить программу до последней версии.
Версия: 2060 от 03.10.2017
+Добавили возможность редактировать API ключ сервиса Яндекс.Перевод
Версия: 2059 от 26.09.2017
Небольшое обновление
-Скорректировали работу функции СУММАПРОПИСЬЮ.
Версия: 2058 от 13.09.2017
-Скорректировали работу функции СКЛОНЕНИЕ.
-Спасибо, что относитесь с пониманием. Велик и могуч наш русский язык.
Функция будет работать в связке со сторонним сервисом Морфер.ру для подстраховки нашей функции. Поэтому возможно достижение ограничения на 1000 запросов в сутки с 1 компьютера.
Версия: 2057 от 11.09.2017
+Сделали собственную функцию СКЛОНЕНИЕ. Теперь нет ограничений по ее использованию. Пишите об ошибках или исключениях из правил, будем совершенствовать.
+Улучшили функцию СУММАПРОПИСЬЮ
-Поправили календарь и функционал вставки даты
-Починили игру Цветовое зрение
-Исправили мелкие ошибки
Установка:
1.Запустите Excel, перейдите в настройки безопасности, в параметрах макросов установите галочки: «Включить макросы» и «Доверять доступ к объектной модели проектов VBA»
2.Откройте в Excel файл VBA-Excel_Install_2.1.0.xlsm
3.Нажмите кнопку «Установить / обновить»
4.Заполните окно регистрации любыми данными (можно просто поставить нули), отметьте чекбокс «Я гуру Excel, мне это не интересно»
5.Нажмите «Установить»
Процедура лечения:
Лекарство создано пользователем Shamaneix с известного трекера, великая ему благодарность за великолепный труд.
Реакция антивирусов на кейген
Процедура лечения описана автором лекарства в текстовом файле в раздаче. Подробнее здесь.
После установки надстройки
(или до установки, но после открытия файла установки надстройки)
Нажимаем на кнопку с информацией — Справка — Активация.
Появляется окно активации с номером, сгенерированным конкретно для вашей копии офиса.
Копируем этот номер и закрываем окно активации.
Открываем через программу файл Keygen.xlsm, нажимаем на кнопку Keygen, в открывшемся поле в верхнюю ячейку вставляем скопированный номер и нажимаем Generate Key. Копируем из нижней ячейки сгенерированный номер.
Закрываем все открытые копии Excel.
Открываем блокнотом reg-файл VBA-Excel.reg и вместо XXXX-XXXX-XXXX-XXXX вставляем номер, сохраняем файл.
Запускаем рег файл и соглашаемся на внесение изменений в реестр.
Открываем Excel, переходим на закладку VBA-Excel, нажимаем на кнопку информации —Справка —Активация, убеждаемся, что надстройка активирована, закрываем и наслаждаемся новыми возможностями.
ВНИМАНИЕ!!! На официальном сайте лежит исправленная редакция этой же версии надстройки,
она не принимает данный метод активации. Не пытайтесь обновить.
Скриншоты Надстройка для Excel — Надстройка VBA-Excel 2.1.00 торрент:
Скачать Надстройка для Excel — Надстройка VBA-Excel 2.1.00 через торрент:
Макросы для работы с листами Excel — копирование листов, переименование и удаление листов, добавление листов в книгу Excel
-
Данный макрос позволяет упростить процедуру сохранения активного листа в книге Excel в отдельный файл.
Для использования этого макроса на любом листе в книге Excel создайте кнопку, и назначьте ей макрос СохранитьЛистВФайл.При запуске макроса (нажатии кнопки) будет выведено диалоговое окно выбора имени для сохраняемого файла, после чего текущий лист будет сохранён под заданным именем в…
-
Макрос предназначен для программного подбора и снятия защиты с листа Excel.
Подобранный пароль не совпадает с установленным — но, тем не менее, защита снимается.
Sub Unlock_Excel_Worksheet()
t = Timer
If UnlockSheet(ActiveSheet) Then
MsgBox «Защита снята. Потребовалось времени: » & Format(Timer — t, «0.0 сек.»)
Else
MsgBox «Не… -
Программа предназначена для сравнения цен конкурентов из их прайсов с прайс-листом вашей организации.ВНИМАНИЕ: Недавно разработана многофункциональная программа для обработки прайс-листов
Новая программа объединения и обработки прайс-листов доступна на сайте для скачивания и тестирования на различных наборах прайс-листов.
Исходными данными для программы являются:
ваш прайс…
-
Надстройка предназначена для облегчения импорта данных в Excel из текстовых файлов с разделителями (например, из CSV)Пока во вложении — обычный файл Excel с нужными макросами, надстройку выложу позже
В надстройке применена функция получения ссылки на заданную пользователем ячейку.
Основой для надстройки послужила функция загрузки CSV файла в двумерный массивИспользовать функции…
-
Как программно (макросом) задать ширину столбца в пикселах
Вроде бы — элементарное действие… но нет, здесь Microsoft нам усложнил задачу.
Получить ширину столбца в пикселах — не проблема, для этого есть свойство Width:
MsgBox «Ширина столбца с активной ячейкой: » & ActiveCell.Width
Но, увы, это свойство доступно только для чтения, — а для назначения ширины столбца нам придётся… -
Программа предназначена для формирования заданий на производство.
Исходными данными выступают таблицы Excel и файлы XML.
При конвертации таблиц происходит обработка данных и перестановка столбцов.
При запуске программа формирует панель инструментов с 6 кнопками — для обработки файлов различной структуры. -
Функция ShapesInRange предназначена для получения объекта типа ShapeRange, содержащего все картинки в заданном диапазоне ячеек листа Excel
Пример использования функции ShapesInRange:
Sub DeleteShapesInRange()
Dim ra As Range: Set ra = Columns(6) ‘ задаём диапазон для поиска картинок
On Error Resume Next ‘ на случай, если картинок в заданном диапазоне нет
ShapesInRange(ra)…. -
Данная программа предназначена для выборки выражений по заданным «минус словам»
В качестве базы используется выгрузка из файлов формата csv, данные загружаются в столбец «A» (далее БАЗА).
В столбец «E» заносятся слова которые нужно найти в БАЗЕ. При нажатии на кнопку «Добавить минус слова» происходит выборка вхождений заданных шаблонов… -
Программа предназначена для импорта данных о соискателях с сайта rabota.ru
В качестве исходных данных для макроса, используется ссылка на результат поиска на сайте rabota.ru
(которую можно получить, забив искомый текст в строке поиска сайта, и скопировав URL страницы результатов поиска из адресной строки браузера).
Во время выполнения кода, происходит авторизация на сайте путем программного… -
Данная функция формирует (создаёт) новую книгу Excel с одним листом (на основании шаблона — листа sh_template), после чего сохраняет новый файл по пути NewFilename$
Если путь не указан, сохранения нового файла не происходит.
Function NewWorksheet(ByRef sh_template As Worksheet, Optional ByVal NewFilename$) As Worksheet
Application.ScreenUpdating = False: On Error Resume Next: Err.Clear… -
Программа предназначена для автоматизации рабочего места сотрудника, отвечающего за регистрацию, прием на работу, и увольнение иностранных граждан.
В качестве исходных данных используется таблица изображенная на скриншоте.
В этой таблице содержится нужная информация, необходимая для заполнения шаблонов документов.
Программа заполняет следующие документы:Доверенность (doc)
Заявление на…
-
Программа предназначена для объединения однотипных файлов в единый сводный файл.
Перед запуском программы требуется выбрать папку, содержащую файлы смет.
При запуске программа загружает из выбранной папки список файлов, соответствующих заданной маске,
и для каждого имени файла, заданного в первом столбце ли листе запуска, подбирает подходящий по имени файл.
Если для какого-то из номеров смет не… -
Программа предназначена для создания маркировальных этикеток для идентификации груза
В качестве исходных данных используется таблица (на скриншоте) имеющая следующие поля:НАИМЕНОВАНИЕ ТОВАРА
КОД ТНВЭД
КОЛИЧЕСТВО
ЕД. ИЗМ.
ВЕС НЕТТО
ВЕС БРУТТО
МЕСТА
ТИП УПАКОВКИ
ОБЪЕМ
ТОРГОВАЯ МАРКА
ПРОИЗВОДИТЕЛЬ
ФОТО
ЗАВОДСКАЯ МАРКИРОВКА
МАРКИРОВКА
НОМЕР ЗАЯВКИ…
-
Надстройка предназначена для формирования оглавления прайс-листов, расположенных на отдельных листах книги Excel.При запуске программа формирует панель инструментов:
Особенности программы:
группировка строк каждого прайс-листа
формирование обратных ссылок с прайс-листов на оглавление
Bubble Sort
— This macro will perform a bubble sort in excel. You use it simply by selecting one column to sort and then running …
Reverse Cell Contents (Mirror)
— This macro will completely reverse the contents of any cell. This means that if you have a cell which reads «My Tex …
test 1
— Code: Sub Convert_Html_Entities() »»»»»»» TeachExcel.com »»»»»»» ‘Convert HTML Entities into read …
test 2 ? 国
— Sub Convert_Html_Entities() »»»»»»» TeachExcel.com »»»»»»» ‘Convert HTML Entities into readable t …
Get Values from a Chart
— This macro will pull the values from a chart in excel and list those values on another spreadsheet. This will get t …
Format Cells as Text in Excel
— This free Excel macro formats a selection of cells as Text in Excel. This macro applies the Text number format to c …
Format Cells as Time in Excel
— This free Excel macro formats a selection of cells in the Time format in Excel. This Time number format means that …
Make Text Uppercase
— This macro will change all text within the selected cells to uppercase. It works only on selected cells within Micr …
Delete Blank Rows in Excel
— This is a macro which will delete blank rows in excel. This version will delete an entire row if there is a blank c …
Delete Duplicate Rows
— This macro will delete rows that appear twice in a list or worksheet. If two cells are identical, this macro will …
Delete Empty Columns
— This macro will delete columns which are completely empty. This means that if there is no data within the entire co …
Delete Hidden Worksheets
— This macro will delete all hidden worksheets within a workbook. When you run this macro a warning window will pop …
Print Entire Workbook in Excel
— This free excel macro allows you to print the entire workbook in Excel. You can easily set this macro to a button …
Print Specific Pages in Excel
— This free Excel macro allows you to print a pre-specified selection of pages from Excel. This means you can print 2 …
Change Text to Lowercase
— This macro will change all text within the selected cells to lowercase. It works only on selected cells within Micr …
Delete a VBA Module From Excel
— Delete a VBA macro module from Excel with this macro. This macro allows you to fully remove a macro module from Ex …
Open any Program from Excel
— This free excel macro allows you to open any program on your computer from excel. You can open a media player, fil …
Open Microsoft Word from Excel
— This free macro will open the Microsoft Word program on your computer. You do need to have this program first. This …