Готовые макросы в vba excel, Миронов Глава Макросы 9
Скачать 1.35 Mb.
|
Готовые макросы в VBA Excel, Миронов Глава 1. Макросы 9 Запуск макроса с поиском ячейки 9 Запуск макроса при открытии книги 9 Запуск макроса при вводе в ячейку «2» 10 Запуск макроса при нажатии «Ентер» 10 Добавить в панель свою вкладку «Надстройки» (Формат ячейки) 10 Глава 2. Работа с файлами (т.е.обмен данными с ТХТ, RTF, XLS и т.д.) 12 Проверка наличия файла по указанному пути_1 12 Проверка наличия файла по указанному пути_2 12 Проверка наличия файла по указанному пути_3 12 Поиск нужного файла_1 13 Поиск нужного файла_2 14 Поиск нужного файла_3 14 Поиск нужного файла_4 14 Автоматизация удаления файлов 14 Произвольный текст в строке состояния 15 Восстановление строки состояния 15 Бегущая строка в строке состояния 15 Быстрое изменение заголовка окна 15 Быстрое изменение заголовка окна_2 15 Изменение заголовка окна (со скрытием названия файла) 15 Возврат к первоначальному заголовку 16 Что открыто в данный момент 16 Работа с текстовыми файлами 16 Запись и чтение текстового файла 16 Обработка нескольких текстовых файлов 17 Определение конца строки текстового файла 18 Копирование из текстового файла в эксель 18 Копирование содержимого в текстовый файл_1 19 Копирование содержимого в текстовый файл_2 19 Экспорт данных в txt 19 Экспорт данных в html 21 Импорт данных, для которых нужно более 256 столбцов 23 Создание резервных копий ценных файлов 26 Подсчет количества открытий файла 26 Вывод пути к файлу в активную ячейку 27 Копирование содержимого файла RTF в эксель 27 Копирование данных из закрытой книги 28 Извлечение данных из закрытого файла 28 Поиск слова в файлах 28 Создание текстового файла и ввод текста в файл 30 Создание текстового файла и ввод текста (определение конца файла) 30 Создание документов Word на основе таблицы Excel 31 Команды создания и удаления каталогов 33 Получение текущего каталога 33 Смена каталога 33 Посмотреть все файлы в каталоге_1 33 Посмотреть все файлы в каталоге_2 33 Посмотреть все файлы в каталоге_3 36 Глава 3. Рабочая область Microsoft Excel 38 Рабочая книга 38 Количество имен рабочей книги 38 Защита рабочей книги 38 Запрет печати книги 39 Открытие книги (или текстовых файлов) 39 Открытие книги и добавление в ячейку А1 текста 39 Сколько книг открыто 39 Закрытие всех книг 39 Закрытие рабочей книги только при выполнении условия 40 Сохранение рабочей книги с именем, представляющим собой текущую дату 40 Сохранена ли рабочая книга 40 Создать книгу с одним листом 40 Создать книгу 40 Удаление ненужных имен 40 Быстрое размножение рабочей книги 41 Сортировка листов 41 Поиск максимального значения на всех листах книги 43 Рабочий лист 44 Проверка наличия защиты рабочего листа 44 Список отсортированных листов 44 Создать новый лист_1 45 Создать новый лист_2 46 Удаление листов в зависимости от даты 46 Копирование листа в книге 46 Копирование листа в новую книгу (создается) 47 Перемещение листа в книге 47 Перемещение нескольких листов в новую книгу 47 Заменить существующий файл 47 «Перелистывание» книги 47 Вставка колонтитула с именем книги, листа и текущей датой 47 Существует ли лист 48 Существует ли лист_2 48 Вывод количества листов в активной книге 48 Вывод количества листов в активной книге в виде гиперссылок 48 Вывод имен активных листов по очереди 49 Вывод имени и номеров листов текущей книги 49 Сделать лист невидимым 49 Сколько страниц на всех листах? 50 Ячейка и диапазон (столбцы и строки) 50 Копирование строк на другой лист 50 Копирование столбцов на другой лист 50 Подсчет количества ячеек, содержащих указанные значения_1 51 Подсчет количества ячеек в диапазоне, содержащих указанные значения_2 51 Подсчет количества видимых ячеек в диапазоне 51 Определение количества ячеек в диапазоне и суммы их значений 52 Подсчет количества ячеек 52 Автоматический пересчет данных таблицы при изменении ее значений 52 Ввод данных в ячейки 53 Ввод данных с использованием формул 54 Последовательный ввод данных 54 Ввод текстоввых данных в ячейки 54 Вывод в ячейки названия книги, листа и количества листов 55 Удаление пустых строк_1 55 Удаление пустых строк_2 55 Удаление пустых строк_3 56 Удаление строки по условию 56 Удаление скрытых строк 57 Удаление дубликатов по маске 57 Выделение диапазона над текущей ячейкой 57 Выделение диапазона над текущей ячейкой_2 58 Выделить ячейку и поместить туда число 59 Выделение отрицательных значений 59 Выделение диапазона и использование абсолютных адресов 59 Выделение ячеек через интервал_1 59 Выделение ячеек через интервал_2 60 Выделение нескольких диапазонов 61 Движение по ячейкам 61 Поиск ближайшей пустой ячейки столбца 61 Поиск максимального значения 62 Поиск и замена по шаблону 62 Поиск значения с отображением результата в отдельном окне 62 Поиск с выделением найденных данных_1 63 Поиск с выделением найденных данных_2 63 Поиск по условию в диапазоне 64 Поиск последней непустой ячейки диапазона 64 Поиск последней непустой ячейки столбца 65 Поиск последней непустой ячейки строки 65 Поиск ячейки синего цвета в диапазоне 65 Поиск отрицательного значения в диапазоне и выделения синим цветом 66 Поиск наличия значения в столбце 66 Поиск совпадений в диапазоне 66 Поиск ячейки в диапазоне_1 67 Поиск ячейки в диапазоне_2 68 Поиск приближенного значения в диапазоне 68 Поиск начала и окончания диапазона, содержащего данные 69 Поиск начала данных 69 Автоматическая замена значений 69 Быстрое заполнение диапазона (массив) 69 Заполнение через интервал(массив) 70 Заполнение указанного диапазона(массив) 70 Заполнение диапазона(массив) 71 Расчет суммы первых значений диапазона 72 Размещение в ячейке электронных часов 72 «Будильник» 73 Оформление верхней и нижней границ диапазона 73 Адрес активной ячейки 73 Координаты активной ячейки 74 Формула активной ячейки 74 Получение из ячейки формулы 74 Тип данных ячейки 74 Вывод адреса конца диапазона 75 Получение информации о выделенном диапазоне 75 Взять слово с 13 символа в ячейке 77 Создание изменяемого списка (таблица) 77 Проверка на пустое значение 77 Пересечение ячеек 78 Умножение выделенного диапазона на 2 78 Одновременное умножение всех данных диапазона 78 Деление диапазона на 100 79 Возведение каждой ячейки диапазона в квадрат 79 Суммирование данных только видимых ячеек 79 Сумма ячеек с числовыми значениями 79 При суммировании — курсор внутри диапазона 80 Начисление процентов в зависимости от суммы_1 80 Начисление процентов в зависимости от суммы_2 81 Начисление процентов в зависимости от суммы_3 81 Сводный пример расчета комиссионного вознаграждения 82 Движение по диапазону 83 Сдвиг от выделенной ячейки 84 Перебор ячеек вниз по колонне 84 Создание заливки диапазона 84 Подбор параметра ячейки 85 Разбиение диапазона 85 Объединение данных диапазона 86 Объединение данных диапазона_2 86 Узнать максимальную колонку или строку. 86 Ограничение возможных значений диапазона 87 Тестирование скорости чтения и записи диапазонов 88 Открыть MsgBox при выборе ячейки 89 Скрытие строки 89 Скрытие нескольких строк 89 Скрытие столбца 90 Скрытие нескольких столбцов 90 Скрытие строки по имени ячейки 90 Скрытие нескольких строк по адресам ячеек 90 Скрытие столбца по имени ячейки 90 Скрытие нескольких столбцов по адресам ячеек 90 Мигание ячейки 90 Глава 4. Работа с примечаниями 91 Вывод на экран всех примечаний рабочего листа 91 Функция извлечения комментария 92 Список примечаний защищенных листов 92 Перечень примечаний в отдельном списке_1 93 Перечень примечаний в отдельном списке_2 93 Перечень примечаний в отдельном списке_3 94 Подсчет количества примечаний_1 95 Подсчет количества примечаний_2 95 Подсчет примечаний_3 95 Выделение ячеек с примечаниями 96 Отображение всех примечаний 96 Изменение цвета примечаний 96 Добавление примечаний 96 Добавление примечаний в диапазон по условию 97 Перенос комментария в ячейку и обратно 97 Перенос значений из ячейки в комментарий_1 98 Перенос значений из ячейки в комментарий_2 98 Глава . Пользовательские вкладки на ленте 99 Дополнение панели инструментов 99 Добавление кнопки на панель инструментов 99 Панель с одной кнопкой 99 Панель с двумя кнопками 100 Создание панели справа 100 Вызов предварительного просмотра 101 Создание пользовательского меню (вариант 1) 101 Создание пользовательского меню (вариант 2) 102 Создание пользовательского меню (вариант 3) 102 Создание пользовательского меню (вариант 4) 103 Создание пользовательского меню (вариант 5) 103 Создание пользовательского меню (вариант 6) 106 Создание списка пунктов главного меню Excel 108 Создание списка пунктов контекстных меню 109 Отображение панели инструментов при определенном условии 110 Скрытие и отображение панелей инструментов 111 Создать подсказку к моим кнопкам 112 Создание меню на основе данных рабочего листа 113 Создание контекстного меню 116 Блокировка контекстного меню 117 Добавление команды в меню Сервис 118 Добавление команды в меню Вид 119 Создание панели со списком 120 Мультфильм с помощником в главной роли 122 Дополнение помощника текстом, заголовком, кнопкой и значком 124 Новые параметры помощника 124 Использование помощника для выбора цвета заливки 125 Глава . ДИАЛОГОВЫЕ ОКНА 127 Функция INPUTBOX (через ввод значения) 127 Вызов предварительного просмотра 127 Настройка ввода данных в диалоговом окне 128 Открытие диалогового окна (“Открыть файл”)_1 128 Открытие диалогового окна (“Открыть файл”)_2 128 Открытие диалогового окна (“Печать”) 129 Другие диалоговые окна 129 Вызов броузера из Экселя 129 Диалоговое окно ввода данных 129 Диалоговое окно настройки шрифта 129 Значения по умолчанию 129 Глава .Форматирование текста. Таблицы. ГРАНИЦЫ И ЗАЛИВКА. 130 Вывод списка доступных шрифтов 130 Выбор из текста всех чисел 130 Прописная буква только в начале текста 131 Подсчет количества повторов искомого текста 131 Выделение из текста произвольного элемента 132 Отображение текста «задом наперед» 133 Англоязычный текст — заглавными буквами 133 Запуск таблицы символов из Excel 134 глава информация о пользователе, компьютере, принтере и т.д. 136 Получить имя пользователя 136 Вывод разрешения монитора 137 Получение информации об используемом принтере 137 Просмотр информации о дисках компьютера 139 ГЛАВА . ЮЗЕРФОРМЫ 140 Глава . ДИАГРАММЫ 142 Построение диаграммы с помощью макроса 142 Сохранение диаграммы в отдельном файле 143 Построение и удаление диаграммы нажатием одной кнопки 144 Вывод списка диаграмм в отдельном окне 145 Применение случайной цветовой палитры 146 Эффект прозрачности диаграммы 146 Построение диаграммы на основе данных нескольких рабочих листов 148 Создание подписей к данным диаграммы 150 ГлаВА . РАЗНЫЕ ПРОГРАММЫ. 151 Программа для составления кроссвордов 151 Создать обложку DVD 155 Игра «Минное поле» 156 Игра «Угадай животное» 158 Расчет на основании ячеек определенного цвета 161 ГЛАВА .ДРУГИЕ ФУНКЦИИ И МАКРОСЫ 174 Вызов функциональных клавиш 174 Расчет среднего арифметического значения 175 Перевод чисел в «деньги» 175 Поиск ближайшего понедельника 176 Подсчет количества полных лет 176 Расчет средневзвешенного значения 177 Преобразование номера месяца в его название 177 Использование относительных ссылок 178 Преобразование таблицы Excel в HTML-формат 178 Генератор случайных чисел 180 Случайные числа — на основании диапазона 181 Применение функции без ввода ее в ячейку 182 Подсчет именованных объектов 183 Включение автофильтра с помощью макроса 183 Создание бегущей строки 183 Создание бегущей картинки 184 Вращающиеся автофигуры 185 Вызов таблицы цветов 187 Создание калькулятора 188 Склонение фамилии, имени и отчества 188 ГЛАВА . ДАТА И ВРЕМЯ 193 Вывод даты и времени_1 193 Вывод даты и времени_2 194 Получение системной даты 195 Извлечение даты и часов 195 Функция ДатаПолная 195 |