Vba excel для чайников в примерах

Первое знакомство с редактором VBA Excel, создание процедур (подпрограмм) и написание простейшего кода, работающего с переменными и ячейками рабочего листа.

Начинаем программировать с нуля
Часть 1. Первая программа
[Часть 1] [Часть 2] [Часть 3] [Часть 4]

Эта статья предназначена для тех, кто желает научиться программировать в VBA Excel с нуля. Вы увидите, как это работает, и убедитесь, что не все так сложно, как кажется с первого взгляда. Свою первую программу вы напишите за 7 простых шагов.

1. Создайте новую книгу Excel и сохраните ее как книгу с поддержкой макросов с расширением .xlsm. В старых версиях Excel по 2003 год – как обычную книгу с расширением .xls.
2. Нажмите сочетание клавиш «Левая_клавиша_Alt+F11», которое откроет редактор VBA. С правой клавишей Alt такой фокус не пройдет. Также, в редактор VBA можно перейти по ссылке «Visual Basic» из панели инструментов «Разработчик» на ленте быстрого доступа. Если вкладки «Разработчик» на ленте нет, ее следует добавить в настройках параметров Excel.

В левой части редактора VBA расположен проводник проекта, в котором отображены все открытые книги Excel. Верхней строки, как на изображении, у вас скорее всего не будет, так как это – личная книга макросов. Справа расположен модуль, в который записываются процедуры (подпрограммы) с кодом VBA. На изображении открыт модуль листа, мы же далее создадим стандартный программный модуль.

1. Нажмите кнопку «Module» во вкладке «Insert» главного меню. То же подменю откроется при нажатии на вторую кнопку после значка Excel на панели инструментов.

После нажатия кнопки «Module» вы увидите ссылку на него, появившуюся в проводнике слева.

Первая программа на VBA Excel

Добавляем на стандартный модуль шаблон процедуры – строки ее начала и завершения, между которыми мы и будем писать свою первую программу (процедуру, подпрограмму).

1. Откройте стандартный модуль двойным кликом по его ссылке в проводнике. Поместите в него курсор и нажмите кнопку «Procedure…» во вкладке «Insert» главного меню. Та же ссылка будет доступна при нажатии на вторую кнопку после значка Excel на панели инструментов.

В результате откроется окно добавления шаблона процедуры (Sub).

1. Наберите в поле «Name» имя процедуры: «Primer1», или скопируйте его отсюда и вставьте в поле «Name». Нажмите кнопку «OK», чтобы добавить в модуль первую и последнюю строки процедуры.

Имя процедуры может быть написано как на латинице, так и на кириллице, может содержать цифры и знак подчеркивания. Оно обязательно должно начинаться с буквы и не содержать пробелы, вместо которых следует использовать знак подчеркивания.

1. Вставьте внутрь шаблона процедуры следующую строку: MsgBox "Привет".

Функция MsgBox выводит информационное сообщение с указанным текстом. В нашем примере – это «Привет».

1. Проверьте, что курсор находится внутри процедуры, и запустите ее, нажав клавишу «F5». А также, запустить процедуру на выполнение можно, нажав на треугольник (на изображении под пунктом меню «Debug») или на кнопку «Run Sub/UserForm» во вкладке «Run» главного меню редактора VBA Excel.

Если вы увидели такое сообщение, как на изображении, то, поздравляю – вы написали свою первую программу!

Работа с переменными

Чтобы использовать в процедуре переменные, их необходимо объявить с помощью ключевого слова «Dim». Если при объявлении переменных не указать типы данных, они смогут принимать любые доступные в VBA Excel значения. Комментарии в тексте процедур начинаются со знака «’» (апостроф).

Пример 2
Присвоение переменным числовых значений:

Public Sub Primer2() ‘Объявляем переменные x, y, z Dim x, y, z ‘Присваиваем значение переменной x x = 25 ‘Присваиваем значение переменной y y = 35 ‘Присваиваем переменной z сумму ‘значений переменных x и y z = x + y ‘Выводим информационное сообщение ‘со значением переменной z MsgBox z End Sub

Пример 3
Присвоение переменным строковых значений:

Public Sub Primer3() ‘Объявляем переменные x, y, z Dim x, y, z ‘Присваиваем строку переменной x x = «Добрый» ‘Присваиваем строку переменной y y = «день!» ‘Присваиваем переменной z строку, ‘состоящую из строк x и y ‘с пробелом между ними z = x & » « & y ‘Выводим информационное сообщение ‘со значением переменной z MsgBox z End Sub

Скопируйте примеры процедур в стандартный модуль и запустите их на выполнение.

Изменение содержимого ячеек

Для обозначения диапазонов, в том числе и отдельных ячеек, в VBA Excel имеется ключевое слово «Range». Ячейке A1 на рабочем листе будет соответствовать выражение Range("A1") в коде VBA Excel.

Пример 4

Public Sub Primer4() ‘Объявляем переменную x Dim x ‘Присваиваем значение переменной x x = 125.61 ‘Присваиваем ячейке A1 ‘значение переменной x Range(«A1») = x ‘Присваиваем значение ячейке B1 Range(«B1») = 356.24 ‘Записываем в ячейку C1 ‘сумму ячеек A1 и B1 Range(«C1») = Range(«A1») + Range(«B1») End Sub

Скопируйте процедуру этого примера в стандартный модуль и запустите на выполнение. Перейдите на активный рабочий лист Excel, чтобы увидеть результат.

---

Время на прочтение
7 мин

Количество просмотров 312K

Приветствую всех.

В этом посте я расскажу, что такое VBA и как с ним работать в Microsoft Excel 2007/2010 (для более старых версий изменяется лишь интерфейс — код, скорее всего, будет таким же) для автоматизации различной рутины.

VBA (Visual Basic for Applications) — это упрощенная версия Visual Basic, встроенная в множество продуктов линейки Microsoft Office. Она позволяет писать программы прямо в файле конкретного документа. Вам не требуется устанавливать различные IDE — всё, включая отладчик, уже есть в Excel.

Еще при помощи Visual Studio Tools for Office можно писать макросы на C# и также встраивать их. Спасибо, FireStorm.

Сразу скажу — писать на других языках (C++/Delphi/PHP) также возможно, но требуется научится читать, изменять и писать файлы офиса — встраивать в документы не получится. А интерфейсы Microsoft работают через COM. Чтобы вы поняли весь ужас, вот Hello World с использованием COM.

Поэтому, увы, будем учить Visual Basic.

Чуть-чуть подготовки и постановка задачи

Итак, поехали. Открываем Excel.

Для начала давайте добавим в Ribbon панель «Разработчик». В ней находятся кнопки, текстовые поля и пр. элементы для конструирования форм.

Появилась вкладка.

Теперь давайте подумаем, на каком примере мы будем изучать VBA. Недавно мне потребовалось красиво оформить прайс-лист, выглядевший, как таблица. Идём в гугл, набираем «прайс-лист» и качаем любой, который оформлен примерно так (не сочтите за рекламу, пожалуйста):

То есть требуется, чтобы было как минимум две группы, по которым можно объединить товары (в нашем случае это будут Тип и Производитель — в таком порядке). Для того, чтобы предложенный мною алгоритм работал корректно, отсортируйте товары так, чтобы товары из одной группы стояли подряд (сначала по Типу, потом по Производителю).

Результат, которого хотим добиться, выглядит примерно так:

Разумеется, если смотреть прайс только на компьютере, то можно добавить фильтры и будет гораздо удобнее искать нужный товар. Однако мы хотим научится кодить и задача вполне подходящая, не так ли?

Кодим

Для начала требуется создать кнопку, при нажатии на которую будет вызываться наша програма. Кнопки находятся в панели «Разработчик» и появляются по кнопке «Вставить». Вам нужен компонент формы «Кнопка». Нажали, поставили на любое место в листе. Далее, если не появилось окно назначения макроса, надо нажать правой кнопкой и выбрать пункт «Назначить макрос». Назовём его FormatPrice. Важно, чтобы перед именем макроса ничего не было — иначе он создастся в отдельном модуле, а не в пространстве имен книги. В этому случае вам будет недоступно быстрое обращение к выделенному листу. Нажимаем кнопку «Новый».

И вот мы в среде разработки VB. Также её можно вызвать из контекстного меню командой «Исходный текст»/«View code».

Перед вами окно с заглушкой процедуры. Можете его развернуть. Код должен выглядеть примерно так:

Sub FormatPrice()End Sub

Напишем Hello World:

Sub FormatPrice()
    MsgBox "Hello World!"
End Sub

И запустим либо щелкнув по кнопке (предварительно сняв с неё выделение), либо клавишей F5 прямо из редактора.

Тут, пожалуй, следует отвлечься на небольшой ликбез по поводу синтаксиса VB. Кто его знает — может смело пропустить этот раздел до конца. Основное отличие Visual Basic от Pascal/C/Java в том, что команды разделяются не ;, а переносом строки или двоеточием (:), если очень хочется написать несколько команд в одну строку. Чтобы понять основные правила синтаксиса, приведу абстрактный код.

Примеры синтаксиса

' Процедура. Ничего не возвращает
' Перегрузка в VBA отсутствует
Sub foo(a As String, b As String)
    ' Exit Sub ' Это значит "выйти из процедуры"
    MsgBox a + ";" + b
End Sub' Функция. Вовращает Integer
Function LengthSqr(x As Integer, y As Integer) As Integer
    ' Exit Function
    LengthSqr = x * x + y * y
End FunctionSub FormatPrice()
    Dim s1 As String, s2 As String
    s1 = "str1"
    s2 = "str2"
    If s1 <> s2 Then
        foo "123", "456" ' Скобки при вызове процедур запрещены
    End IfDim res As sTRING ' Регистр в VB не важен. Впрочем, редактор Вас поправит
    Dim i As Integer
    ' Цикл всегда состоит из нескольких строк
    For i = 1 To 10
        res = res + CStr(i) ' Конвертация чего угодно в String
        If i = 5 Then Exit For
    Next iDim x As Double
    x = Val("1.234") ' Парсинг чисел
    x = x + 10
    MsgBox xOn Error Resume Next ' Обработка ошибок - игнорировать все ошибки
    x = 5 / 0
    MsgBox xOn Error GoTo Err ' При ошибке перейти к метке Err
    x = 5 / 0
    MsgBox "OK!"
    GoTo ne

Err:
    MsgBox 

"Err!"

ne:

On Error GoTo 0 ' Отключаем обработку ошибок

    ' Циклы бывает, какие захотите
    Do While True
        Exit DoLoop 'While True
    Do 'Until False
        Exit Do
    Loop Until False
    ' А вот при вызове функций, от которых хотим получить значение, скобки нужны.
    ' Val также умеет возвращать Integer
    Select Case LengthSqr(Len("abc"), Val("4"))
    Case 24
        MsgBox "0"
    Case 25
        MsgBox "1"
    Case 26
        MsgBox "2"
    End Select' Двухмерный массив.
    ' Можно также менять размеры командой ReDim (Preserve) - см. google
    Dim arr(1 to 10, 5 to 6) As Integer
    arr(1, 6) = 8Dim coll As New Collection
    Dim coll2 As Collection
    coll.Add "item", "key"
    Set coll2 = coll ' Все присваивания объектов должны производится командой Set
    MsgBox coll2("key")
    Set coll2 = New Collection
    MsgBox coll2.Count
End Sub

Грабли-1. При копировании кода из IDE (в английском Excel) есь текст конвертируется в 1252 Latin-1. Поэтому, если хотите сохранить русские комментарии — надо сохранить крокозябры как Latin-1, а потом открыть в 1251.

Грабли-2. Т.к. VB позволяет использовать необъявленные переменные, я всегда в начале кода (перед всеми процедурами) ставлю строчку Option Explicit. Эта директива запрещает интерпретатору заводить переменные самостоятельно.

Грабли-3. Глобальные переменные можно объявлять только до первой функции/процедуры. Локальные — в любом месте процедуры/функции.

Еще немного дополнительных функций, которые могут пригодится: InPos, Mid, Trim, LBound, UBound. Также ответы на все вопросы по поводу работы функций/их параметров можно получить в MSDN.

Надеюсь, что этого Вам хватит, чтобы не пугаться кода и самостоятельно написать какое-нибудь домашнее задание по информатике. По ходу поста я буду ненавязчиво знакомить Вас с новыми конструкциями.

Кодим много и под Excel

В этой части мы уже начнём кодить нечто, что умеет работать с нашими листами в Excel. Для начала создадим отдельный лист с именем result (лист с данными назовём data). Теперь, наверное, нужно этот лист очистить от того, что на нём есть. Также мы «выделим» лист с данными, чтобы каждый раз не писать длинное обращение к массиву с листами.

Sub FormatPrice()
    Sheets("result").Cells.Clear
    Sheets("data").Activate
End Sub

Работа с диапазонами ячеек

Вся работа в Excel VBA производится с диапазонами ячеек. Они создаются функцией Range и возвращают объект типа Range. У него есть всё необходимое для работы с данными и/или оформлением. Кстати сказать, свойство Cells листа — это тоже Range.

Примеры работы с Range

Sheets("result").Activate
Dim r As Range
Set r = Range("A1")
r.Value = "123"
Set r = Range("A3,A5")
r.Font.Color = vbRed
r.Value = "456"
Set r = Range("A6:A7")
r.Value = "=A1+A3"

Теперь давайте поймем алгоритм работы нашего кода. Итак, у каждой строчки листа data, начиная со второй, есть некоторые данные, которые нас не интересуют (ID, название и цена) и есть две вложенные группы, к которым она принадлежит (тип и производитель). Более того, эти строки отсортированы. Пока мы забудем про пропуски перед началом новой группы — так будет проще. Я предлагаю такой алгоритм:

1. Считали группы из очередной строки.
2. Пробегаемся по всем группам в порядке приоритета (вначале более крупные)
   1. Если текущая группа не совпадает, вызываем процедуру AddGroup(i, name), где i — номер группы (от номера текущей до максимума), name — её имя. Несколько вызовов необходимы, чтобы создать не только наш заголовок, но и всё более мелкие.
3. После отрисовки всех необходимых заголовков делаем еще одну строку и заполняем её данными.

Для упрощения работы рекомендую определить следующие функции-сокращения:

Function GetCol(Col As Integer) As String
    GetCol = Chr(Asc("A") + Col)
End FunctionFunction GetCellS(Sheet As String, Col As Integer, Row As Integer) As Range
    Set GetCellS = Sheets(Sheet).Range(GetCol(Col) + CStr(Row))
End FunctionFunction GetCell(Col As Integer, Row As Integer) As Range
    Set GetCell = Range(GetCol(Col) + CStr(Row))
End Function

Далее определим глобальную переменную «текущая строчка»: Dim CurRow As Integer. В начале процедуры её следует сделать равной единице. Еще нам потребуется переменная-«текущая строка в data», массив с именами групп текущей предыдущей строк. Потом можно написать цикл «пока первая ячейка в строке непуста».

Глобальные переменные

Option Explicit ' про эту строчку я уже рассказывал
Dim CurRow As Integer
Const GroupsCount As Integer = 2
Const DataCount As Integer = 3

FormatPrice

Sub FormatPrice()
    Dim I As Integer ' строка в data
    CurRow = 1
    Dim Groups(1 To GroupsCount) As String
    Dim PrGroups(1 To GroupsCount) As String

    Sheets(

"data").Activate
    I = 2
    Do While True
        If GetCell(0, I).Value = "" Then Exit Do
        ' ...
        I = I + 1
    Loop
End Sub

Теперь надо заполнить массив Groups:

На месте многоточия

Dim I2 As Integer
For I2 = 1 To GroupsCount
    Groups(I2) = GetCell(I2, I)
Next I2
' ...
For I2 = 1 To GroupsCount ' VB не умеет копировать массивы
    PrGroups(I2) = Groups(I2)
Next I2
I =  I + 1

И создать заголовки:

На месте многоточия в предыдущем куске

For I2 = 1 To GroupsCount
    If Groups(I2) <> PrGroups(I2) Then
        Dim I3 As Integer
        For I3 = I2 To GroupsCount
            AddHeader I3, Groups(I3)
        Next I3
        Exit For
    End If
Next I2

Не забудем про процедуру AddHeader:

Перед FormatPrice

Sub AddHeader(Ty As Integer, Name As String)
    GetCellS("result", 1, CurRow).Value = Name
    CurRow = CurRow + 1
End Sub

Теперь надо перенести всякую информацию в result

For I2 = 0 To DataCount - 1
    GetCellS("result", I2, CurRow).Value = GetCell(I2, I)
Next I2

Подогнать столбцы по ширине и выбрать лист result для показа результата

После цикла в конце FormatPrice

Sheets("Result").Activate
Columns.AutoFit

Всё. Можно любоваться первой версией.

Некрасиво, но похоже. Давайте разбираться с форматированием. Сначала изменим процедуру AddHeader:

Sub AddHeader(Ty As Integer, Name As String)
    Sheets("result").Range("A" + CStr(CurRow) + ":C" + CStr(CurRow)).Merge
    ' Чтобы не заводить переменную и не писать каждый раз длинный вызов
    ' можно воспользоваться блоком With
    With GetCellS("result", 0, CurRow)
        .Value = Name
        .Font.Italic = True
        .Font.Name = "Cambria"
        Select Case Ty
        Case 1 ' Тип
            .Font.Bold = True
            .Font.Size = 16
        Case 2 ' Производитель
            .Font.Size = 12
        End Select
        .HorizontalAlignment = xlCenter
    End With
    CurRow = CurRow + 1
End Sub

Уже лучше:

Осталось только сделать границы. Тут уже нам требуется работать со всеми объединёнными ячейками, иначе бордюр будет только у одной:

Поэтому чуть-чуть меняем код с добавлением стиля границ:

Sub AddHeader(Ty As Integer, Name As String)
    With Sheets("result").Range("A" + CStr(CurRow) + ":C" + CStr(CurRow))
        .Merge
        .Value = Name
        .Font.Italic = True
        .Font.Name = "Cambria"
        .HorizontalAlignment = xlCenterSelect Case Ty
        Case 1 ' Тип
            .Font.Bold = True
            .Font.Size = 16
            .Borders(xlTop).Weight = xlThick
        Case 2 ' Производитель
            .Font.Size = 12
            .Borders(xlTop).Weight = xlMedium
        End Select
        .Borders(xlBottom).Weight = xlMedium ' По убыванию: xlThick, xlMedium, xlThin, xlHairline
    End With
    CurRow = CurRow + 1
End Sub

Осталось лишь добится пропусков перед началом новой группы. Это легко:

В начале FormatPrice

Dim I As Integer ' строка в  data
CurRow = 0 ' чтобы не было пропуска в самом начале
Dim Groups(1 To GroupsCount) As String

В цикле расстановки заголовков

If Groups(I2) <> PrGroups(I2) Then
    CurRow = CurRow + 1
    Dim I3 As Integer

В точности то, что и хотели.

Надеюсь, что эта статья помогла вам немного освоится с программированием для Excel на VBA. Домашнее задание — добавить заголовки «ID, Название, Цена» в результат. Подсказка: CurRow = 0 CurRow = 1.

Файл можно скачать тут (min.us) или тут (Dropbox). Не забудьте разрешить исполнение макросов. Если кто-нибудь подскажет человеческих файлохостинг, залью туда.

Спасибо за внимание.

Буду рад конструктивной критике в комментариях.

UPD: Перезалил пример на Dropbox и min.us.

UPD2: На самом деле, при вызове процедуры с одним параметром скобки можно поставить. Либо использовать конструкцию Call Foo(«bar», 1, 2, 3) — тут скобки нужны постоянно.

Самоучитель по Excel VBA

​Смотрите также​ как создать и​ выберите категорию​Personal.xls​ же может написать​ с оператора​ правой части окна​Макрос для объединения повторяющихся​Выберите в списке макрос,​ выделение ячеек, строк​ записываются в соответствующие​Функции форматирования. Важнейшей из​ в ячейку с​ его ячейке будут​ сам код макроса​сохраняют, нажав на иконку​

​ программирования. К особенностям​Данный учебник является введением​ использовать макрос внутри​Макросы​, которая используется как​ макрос, который делает​Sub​ флажок​ ячеек в таблице​ который требуется удалить,​ или столбцов, а​ ячейки, поэтому нет​ них является Format.​ координатами (1,1) было​ записаны квадраты номера​ находится между строками​ с изображением floppy​ VBA относится выполнение​ в язык программирования​ файла одной рабочей​и при помощи​ хранилище макросов. Все​ то, что Excel​, за которым идет​Разработчик (Developer)​ Excel.​

• ​ и нажмите кнопку​
• ​ также выделение ячеек​ необходимости их присваивания​
• ​ Она возвращает значение​
• ​ записано:​ соответствующей строки. Использование​
• ​ Sub Макрос1() и​
• ​ disk;​
• ​ скрипта в среде​ Excel VBA (Visual​
• ​ книги. В случаи,​ кнопки​
• ​ макросы из​ никогда не умел​
• ​ имя макроса и​
• ​. Теперь на появившейся​

​Практический пример и​ «Удалить».​ путем перетаскивания указателя​ переменным.​

​ типа Variant с​1, если аргумент положительный;​
​ конструкции For позволит​
​ End Sub.​

​пишут, скажем так, набросок​

office-guru.ru

VBA Excel: примеры программ. Макросы в Excel

​ офисных приложений.​ Basic for Applications).​ когда необходимо использовать​Добавить (Add)​Personal.xls​ (сортировку по цвету,​ список аргументов (входных​ вкладке нам будут​ пошаговый разбор исходного​К началу страницы​ мыши. Команды для​Перед запуском созданной программы,​ выражением, отформатированным согласно​0, если аргумент нулевой;​ записать ее очень​Если копирование было выполнено,​ кода.​Недостатком программы являются проблемы,​

Что такое VBA

​ Изучив VBA, Вы​ тот же макрос​перенесите выбранный макрос​загружаются в память​ например или что-то​ значений) в скобках.​ доступны основные инструменты​

​ VBA-кода макроса для​VBA коды для​ записи, создания и​ требуется сохранить рабочую​ инструкциям, которые заданы​-1, если аргумент отрицательный.​ коротко, без использования​ например, из ячейки​Он выглядит следующим образом:​ связанные с совместимостью​ сможете создавать макросы​

​ в других файлах​ в правую половину​ при старте Excel​ подобное).​ Если аргументов нет,​ для работы с​ автоматического объединения повторяющихся​ простых программ макросов​ удаления макросов доступны​ книгу, например, под​ в описании формата.​Создание такого макроса для​ счетчика.​ А1 в ячейку​Sub program ()​ различных версий. Они​ и выполнять в​ рабочих книг, тогда​ окна, т.е. на​ и могут быть​Если во время записи​ то скобки надо​

Объекты, коллекции, свойства и методы

​ макросами, в том​ одинаковых ячеек в​ необходимых при работе​ на вкладке ленты​ названием «Отчет1.xls».​и пр.​ «Эксель» начинается стандартным​Сначала нужно создать макрос,​ C1, то одна​’Наш код​ обусловлены тем, что​ Excel практически любые​ можно сохранить его​

​ панель быстрого доступа:​ запущены в любой​ макроса макрорекордером вы​ оставить пустыми.​ числе и нужная​ строках таблицы. 1​ с таблицами на​Разработчик​Клавишу «Создать отчетную таблицу»​Изучение свойств этих функций​

​ способом, через использование​ как описано выше.​ из строк кода​End Sub​ код программы VBA​ задачи. Вы очень​ в личной книге​Кнопка на листе​

​ момент и в​ ошиблись — ошибка​Любой макрос должен заканчиваться​ нам кнопка​ 2 3 4​ каждый день.​

​.​ требуется нажать всего​ и их применение​ «горячих» клавиш Alt​ Далее записываем сам​ будет выглядеть, как​Обратите внимание, что строка​ обращается к функциональным​ скоро поймёте, что​ макросов. У нее​Этот способ подходит для​ любой книге.​ будет записана. Однако​ оператором​Редактор Visual Basic​

​Всем нам приходится -​Макрос для копирования листа​Если вкладка​ 1 раз после​

Как начать

​ позволит значительно расширить​ и F11. Далее​ код. Считаем, что​ Range(“C1”).Select. В переводе​ «’Наш код» будет​ возможностям, которые присутствуют​

​ макросы могут сэкономить​ всегда одно название​ любой версии Excel.​После включения записи и​ смело можете давить​

• ​End Sub​(Visual Basic Editor)​ кому реже, кому​ в Excel c​Разработчик​
• ​ ввода заголовочной информации.​
• ​ сферу применения «Эксель».​ записывается следующий код:​ нас интересуют значения​
• ​ это выглядит, как​ выделена другим цветом​

​ в новой версии​

​ уйму времени благодаря​

​ – Personal.xlsb. Она​

​ Мы добавим кнопку​

​ выполнения действий, которые​ на кнопку отмены​.​:​ чаще — повторять​ любым количеством копий.​недоступна, выполните перечисленные​ Следует знать и​

​Попробуем перейти к решению​Sub program()​ для 10 ячеек.​ «Диапазон(“C1”).Выделить», иными словами​ (зеленым). Причина в​ продукта, но отсутствуют​ автоматизации повторяющихся задач​ всегда открывается при​ запуска макроса прямо​ необходимо записать, запись​ последнего действия (Undo)​Все, что находится между​К сожалению, интерфейс редактора​ одни и те​

Макросы в Excel

​Практический пример с​ ниже действия, чтобы​ другие правила. В​ более сложных задач.​x= Cells(1, 1).Value (эта​ Код выглядит следующим​ осуществляет переход в​ апострофе, поставленном в​ в старой. Также​ и обеспечить гибкое​ запуске программы Excel,​ на рабочий лист,​ можно остановить командой​ — во время​Sub​ VBA и файлы​ же действия и​ описанием и исходным​ открыть ее.​ частности, кнопка «Добавить​

Пример 1

​ Например:​ команда присваивает x​ образом.​ VBA Excel, в​ начале строки, который​

​ к минусам относят​

• ​ взаимодействие с другими​
• ​ только скрыто. Данная​
• ​ как графический объект.​
• ​Остановить запись​

​ записи макроса макрорекордером​и​ справки не переводятся​ операции в Excel.​ кодом макроса для​Выберите​ строку» должна нажиматься​Дан бумажный документ отчета​ значение содержимого ячейки​

​For i = 1​ ячейку С1.​ обозначает, что далее​ и чрезмерно высокую​ пользователями.​ книга не является​ Для этого:​(Stop Recording)​ она не просто​

​End Sub​

• ​ компанией Microsoft на​ Любая офисная работа​
• ​ одновременного копирования любого​Excel​
• ​ каждый раз после​ фактического уровня издержек​ с координатами (1,​

​ to 10 Next​Активную часть кода завершает​ следует комментарий.​ открытость кода для​

​Этот учебник не является​ доступной по умолчанию​В Excel 2003 и​.​ возрвращает Вас в​- тело макроса,​ русский язык, поэтому​ предполагает некую «рутинную​ количества рабочих листов.​>​ ввода в таблицу​ предприятия. Требуется:​

​ 1))​Команда переводится на «человеческий»​ команда ActiveSheet.Paste. Она​Теперь вы можете написать​ изменения посторонним лицом.​ исчерпывающим руководством по​ в Excel, поэтому​ старше — откройте​Управление всеми доступными макросами​ предыдущее состояние, но​ т.е. команды, которые​ с английскими командами​

​ составляющую» — одни​Макрос для выделения и​настройки​ значений по каждому​разработать его шаблонную часть​If x>0 Then Cells(1,​ язык, как «Повторять​

Пример 2

​ означает запись содержания​ любой код и​ Тем не менее​

​ языку программирования Excel​ ее нужно сначала​ панель инструментов​ производится в окне,​ и стирает последнюю​ будут выполняться при​ в меню и​ и те же​ удаления пустых столбцов​>​

​ виду деятельности. После​ посредством табличного процессора​ 1).Value = 1​ от 1 до​ выделенной ячейки (в​ создать для себя​ Microsoft Office, а​ VBA. Его цель​ подключить.​

​Формы​ которое можно открыть​ записанную команду на​ запуске макроса. В​ окнах придется смириться:​ еженедельные отчеты, одни​ в Excel.​

​панель инструментов и ленты​

​ занесения всех данных​

​ «Эксель»;​

​If x=0 Then Cells(1,​

​ 10 с шагом​

​ данном случае А1)​ новый инструмент в​ также IBM Lotus​ – помочь начинающему​Чтобы создать и схоронить​

​через меню​ с помощью кнопки​

​ VBA.​ данном случае макрос​Макросы (т.е. наборы команд​ и те же​

​Выделение, удаление, скрытие​.​ требуется нажать кнопку​составить программу VBA, которая​

​ 1).Value = 0​ один».​

​ в выделенную ячейку​ VBA Excel (примеры​ Symphony позволяют пользователю​

​ специалисту освоить написание​

​ код в личной​

​Вид — Панели инструментов​Макросы (Macros)​Чтобы включить запись необходимо:​ выделяет ячейку заливает​ на языке VBA)​ действия по обработке​ и добавление пустых​В разделе​

​ «Закончить» и затем​ будет запрашивать исходные​If x​

Пример 3

​Если ставится задача получить​ С1.​ программ см. далее).​ применять шифрование начального​ макросов в Excel​ книге макросов:​ — Формы (View​

​на вкладке​в Excel 2003 и​ выделенных диапазон (Selection)​ хранятся в программных​ поступивших данных, заполнение​ столбцов в таблицу​Настройка ленты​ переключиться в окно​ данные для ее​

​End Sub.​ столбец с квадратами,​Циклы VBA помогают создавать​ Конечно, тем, кто​ кода и установку​ при помощи кода​Выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Запись макроса».​ — Toolbars -​

​Разработчик (Developer)​ старше — выбрать​

​ желтым цветом (код​ модулях. В любой​ однообразных таблиц или​ по условию пользователя​выберите​

​ «Эксель».​ заполнения, осуществлять необходимые​Остается запустить макрос и​ например, всех нечетных​ различные макросы в​ знаком с азами​

​ пароля для его​ VBA. Для желающих​В появившемся диалоговом окне​

​ Forms)​или — в​ в меню​ = 6) и​ книге Excel мы​ бланков и т.д.​ с помощью макросов.​

​Основные вкладки​Теперь вы знаете, как​ расчеты и заполнять​ получить в «Эксель»​ чисел из диапазона​ Excel.​ Visual Basic, будет​ просмотра.​ изучить этот язык​ «Запись макроса», из​В Excel 2007 и​

​ старых версиях Excel​Сервис — Макрос -​

​ затем проходит в​

​ можем создать любое​ Использование макросов и​ Исходные коды предоставляться​и установите флажок​ решать задачи для​ ими соответствующие ячейки​

​ нужное значение для​ от 1 до​Циклы VBA помогают создавать​ намного проще. Однако​Именно с этими понятиями​

​ программирования более глубоко​ выпадающего списка «Сохранить​ новее — откройте​ — через меню​

​ Начать запись​

​ цикле по всем​ количество программных модулей​ пользовательских функций позволяет​ с описанием и​Разработчик​ Excel с помощью​ шаблона.​ аргумента.​ 11, то пишем:​ различные макросы. Предположим,​ даже те, кто​

Пример 4

​ нужно разобраться тем,​ существуют отличные книги​ в:» выберите опцию​ выпадающий список​Сервис — Макрос -​(Tools — Macro -​ ячейкам, заменяя формулы​ и разместить там​ автоматизировать эти операции,​ примерами в картинках.​.​ макросов. Умение применять​Рассмотрим один из вариантов​Как вы уже могли​For i = 1​ что имеется функция​ их не имеет,​

​ кто собирается работать​ по Excel VBA.​ «Личная книга макросов».​Вставить (Insert)​ Макросы​ Record New Macro)​

​ на значения. В​

​ наши макросы. Один​

​ перекладывая монотонную однообразную​

​Макрос для выделения и​Нажмите кнопку​ vba excel (примеры​ решения.​ заметить, программировать в​ to 10 step​

​ y=x + x2​

​ при желании смогут​ в среде VBA.​ Далее приведено содержание​ И нажмите на​на вкладке​

​(Tools — Macro -​в Excel 2007 и​

​ конце выводится окно​ модуль может содержать​

​ работу на плечи​

​ удаления пустых строк​

​Сохранить​ программ см. выше)​Все действия осуществляются на​ самом известном табличном​

Функции VBA

​ 1 Next.​ + 3×3 –​ освоиться достаточно быстро.​ Прежде всего необходимо​ самоучителя по Excel​ кнопку OK.​Разработчик (Developer)​ Macros)​ новее — нажать​ сообщения (MsgBox).​ любое количество макросов.​ Excel. Другим поводом​ в Excel.​и закройте​ может понадобиться и​ стандартном листе в​

• ​ процессоре Microsoft не​Здесь step — шаг.​ cos(x). Требуется создать​За таким названием скрываются​ понять, что такое​
• ​ Visual Basic. Для​Теперь выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Остановить​ ​:​ кнопку​С ходу ясно, что​ Доступ ко всем​
• ​ для использования макросов​Примеры макросов с​Параметров Excel​
• ​ для работы в​ Excel. Резервируются свободные​ так уж сложно.​ В данном случае​ макрос для получения​ программы, написанные на​ объект. В Excel​ начинающих программистов настоятельно​ запись».​Выберите объект​Любой выделенный в списке​Запись макроса (Record macro)​ вот так сразу,​ модулям осуществляется с​ в вашей работе​ исходными кодами для​.​
• ​ среде самого популярного​ ячейки для внесения​ Особенно, если научиться​ он равен двум.​ ее графика. Сделать​
• ​ языке Visual Basic​ в этом качестве​ рекомендуется начать с​Откройте редактор Visual Basic:​Кнопка (Button):​ макрос можно запустить​на вкладке​ без предварительной подготовки​ помощью окна Project​ может стать необходимость​ удаления, выделения, добавления​На вкладке​ на данный момент​
• ​ данных по месяцу,​ применять функции VBA.​ По умолчанию отсутствие​ это можно только,​ for Application. Таким​
• ​ выступают лист, книга,​ первого раздела учебника​ «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или​Затем нарисуйте кнопку на​ кнопкой​Разработчик (Developer)​ и опыта в​
• ​ Explorer в левом​

​ добавить в Microsoft​ и скрытия пустых​Разработчик​ текстового редактора «Ворд».​

Пример 5

​ году, названию компании-потребителя,​ Всего в этом​ этого слова в​

​ используя циклы VBA.​ образом, программирование в​ ячейка и диапазон.​

• ​ и изучать их​ нажмите комбинацию горячих​ листе, удерживая левую​
• ​Выполнить​Затем необходимо настроить параметры​ программировании вообще и​ верхнем углу редактора​ Excel недостающие, но​ строк в исходной​нажмите кнопку​

​ В частности, можно​ сумме издержек, их​

Создание шаблона

​ языке программирования, созданном​ цикле означает, что​За начальное и конечное​ Excel — это​ Данные объекты обладают​ по порядку. Те,​ клавиш ALT+F11. В​ кнопку мыши. Автоматически​(Run)​ записываемого макроса в​ на VBA в​ (если его не​ нужные вам функции.​ таблице данных. ​Запись макроса​ путем записи, как​ уровня, товарооборота. Так​ специально для написания​

Переменные

​ шаг единичный.​ значение аргумента функции​ создание макросов с​ специальной иерархией, т.е.​ кто имеет опыт​

• ​ окне «Project-VBAProject», в​ появится окно, где​
• ​.​ окне​ частности, сложновато будет​
• ​ видно, нажмите CTRL+R).​ Например функцию сборки​Макрос для выделения ячеек​
• ​.​ показано в самом​ как количество компаний​

​ приложений в «Эксель»​Полученные результаты нужно сохранять​ берут x1=0 и​ нужным кодом. Благодаря​ подчиняются друг другу.​ в программировании на​ дереве проектов появиться​ нужно выбрать макрос,​

Решение задачи с использованием программирования на VBA

​Кнопка​Запись макроса​ сообразить какие именно​ Программные модули бывают​ данных с разных​ со снятой защитой​Примечание:​ начале статьи, или​ (обществ), относительно которых​

​ и Word, около​ в ячейки с​ x2=10. Кроме того,​ этой возможности табличный​

​Главным из них является​ VBA, могут сразу​ доступная еще одна​ который должен запускаться​Параметры​

​:​ команды и как​ нескольких типов для​ листов на один​ на листе Excel.​ Чтобы создать макрос из​ через написание кода​ составляется отчет, не​

​ 160 функций. Их​ номером (i,1). Тогда​ необходимо ввести константу​ процессор Microsoft саморазвивается,​ Application, соответствующий самой​

​ же перейти к​ книга Personal.xlsb. Кликните​ при щелчке по​(Options)​

​Имя макроса​ надо вводить, чтобы​ разных ситуаций:​ итоговый лист, разнесения​Исходный код с​ VBE, щелкните​ создавать кнопки меню,​ зафиксировано, ячейки для​ можно разделить на​ при каждом запуске​ — значение для​ подстраиваясь под требования​ программе Excel. Затем​ интересующим темам.​ на «плюсик» слева​ нарисованной кнопке.​позволяет посмотреть и​

​- подойдет любое​ макрос автоматически выполнял​Обычные модули​ данных обратно, вывод​ примером и описанием​Visual Basic​ благодаря которым многие​ внесения значений по​ несколько больших групп.​ цикла с увеличением​ шага изменения аргумента​ конкретного пользователя. Разобравшись​ следуют Workbooks, Worksheets,​Часть 1: Оформление кода​ на против этой​Создание пользовательских функций или,​ отредактировать сочетание клавиш​ имя на русском​ все действия, которые,​- используются в​ суммы прописью и​ для VBA-макроса выделения​. В окне кода​ операции над текстом​

​ итогам и ФИО​

fb.ru

Создание и удаление макросов в Excel для Mac с помощью вкладки «Разработчик»

​ Это:​​ i на величину​ и начальное значение​ с тем, как​ а также Range.​Часть 2: Типы данных,​ книги, чтобы раскрыть​ как их иногда​ для быстрого запуска​ или английском языке.​ например, Вы делаете​ большинстве случаев, когда​ т.д.​ ячеек у которых,​ модуля введите код​ можно будет осуществлять​ специалиста заранее не​Математические функции. Применив их​ шага автоматически будет​ для счетчика.​ создавать модули для​

​ Например, для обращения​ переменные и константы​ проект книги Personal.xlsb.​ еще называют, UDF-функций​ макроса.​ Имя должно начинаться​ для создания еженедельного​ речь идет о​Макрос​ снятая защита от​ макроса.​ нажатием дежурных клавиш​ резервируют. Рабочему листу​ к аргументу, получают​ расти и номер​Все примеры макросов VBA​ написания макросов, можно​ к ячейке A1​Часть 3: Массивы​

Запись макроса

​ А после двойным​ (User Defined Functions)​Кнопка​ с буквы и​ отчета для руководства​ макросах. Для создания​- это запрограммированная​ ввода значений данных​В поле​ или через вкладку​ присваивается новое название.​ значение косинуса, натурального​ у строки. Таким​ Excel создаются по​ приступать к рассмотрению​ на конкретном листе​Часть 4: Процедуры Function​​ щелчком отройте ее​​ принципиально не отличается​

1. ​Изменить​​ не содержать пробелов​​ компании. Поэтому мы​ такого модуля выберите​ последовательность действий (программа,​

   1. ​ и редактирования.​​Имя макроса​​ «Вид» и пиктограмму​​ Например, «Օтчет».​​ логарифма, целой части​​ образом, произойдет оптимизация​​ той же процедуре,​

   2. ​ конкретных примеров программ​​ следует указать путь​​ и Sub​​ Module1.​​ от создания макроса​​(Edit)​​ и знаков препинания.​

   3. ​ переходим ко второму​​ в меню​​ процедура), записанная на​​Макрос для поиска ячеек​​введите имя макроса.​

   

2. ​ «Макросы».​​Для написания программы автоматического​​ и пр.​​ кода.​​ которая представлена выше.​

   ​ VBA Excel. Лучше​​ с учетом иерархии.​Часть 5: Условные операторы​​В результате откроется окно​​ в обычном программном​открывает редактор Visual​Сочетание клавиш​

   

3. ​ способу создания макросов,​​Insert — Module​​ языке программирования Visual​

   ​ в Excel с​Первым символом имени макроса​Автор: Наира​ заполнения шаблона, необходимо​Финансовые функции. Благодаря их​В целом код будет​ В данном конкретном​ всего начать с​Что касается понятия «коллекция»,​Часть 6: Циклы​ кода модуля с​ модуле. Разница только​ Basic (см. выше)​- будет потом​ а именно…​. В появившееся окно​

4. ​ Basic for Applications​​ выпадающим списком и​​ должна быть буква.​​Примечание:​​ выбрать обозначения. Они​

5. ​ наличию и используя​​ выглядеть, как:​​ случае код выглядит,​ самых элементарных кодов.​ то это группа​

   

   ​Часть 7: Операторы и​​ зарегистрированным макросом. Удалите​ в том, что​ и позволяет просмотреть​ использоваться для быстрого​Макрорекордер​ нового пустого модуля​

6. ​ (VBA). Мы можем​ условным форматированием.​​ Последующие символы могут​​ Мы стараемся как можно​​ будут использоваться для​​ программирование в Excel,​

7. ​Sub program()​

8. ​ как:​​Задача: написать программу, которая​​ объектов того же​​ встроенные функции​​ его код и​

​ макрос выполняет последовательность​

Удаление макроса

1. ​ и отредактировать текст​​ запуска макроса. Если​​- это небольшая​​ можно вводить команды​​ запускать макрос сколько​

2. ​Исходный VBA-код макроса​ быть буквами, цифрами​ оперативнее обеспечивать вас​ переменных:​

   

​ можно получать эффективные​

support.office.com

Запуск и создание макросов в Excel для чайников

​For i = 1​Sub programm()​ будет копировать значение​ класса, которая в​Часть 8: Объектная модель​

Создание и выполнение макросов

​ введите код своего​ действий с объектами​ макроса на VBA.​
​ забудете сочетание или​ программа, встроенная в​ на VBA, набирая​ угодно раз, заставляя​ для поиска выпадающих​​ или знаками подчеркивания.​ актуальными справочными материалами​NN– номер текущей строки​
​ инструменты для ведения​ To 10 Step​x1 = 1​ содержимое одной ячейки​ записи имеет вид​ Excel​ макроса. Выберите инструмент​ книги (ячейками, формулами​​Чтобы не запоминать сочетание​ вообще его не​ Excel, которая переводит​
​ их с клавиатуры​ Excel выполнять последовательность​ списков на рабочем​ В имени макроса​ на вашем языке.​ таблицы;​​ бухгалтерского учета и​ 1 (можно записать​x2 = 10​
​ и затем записывать​ ChartObjects. Ее отдельные​Часть 9: События в​ в редакторе макросов:​ и значениями, листами,​ клавиш для запуска​ введете, то макрос​​ любое действие пользователя​ или копируя их​ любых нужных нам​ листе. Исходный код​
​ не должно содержаться​ Эта страница переведена​TP и TF –​ осуществления финансовых расчетов.​ просто For i​shag = 0.1​ в другую.​​ элементы также являются​ Excel​ «File»-«Save Personal.xlsb», а​
​ диаграммами и т.д.),​ макроса, лучше создать​ можно будет запустить​ на язык программирования​ из другого модуля,​ действий, которые нам​​ VBA-макроса для поиска​ пробелов; в качестве​ автоматически, поэтому ее​
​ планируемый и фактический​Функции обработки массивов. К​ = 1 To​i = 1​Для этого:​ объектами.​Часть 10: Ошибки VBA​​ потом закройте редактор​ а пользовательская функция​ кнопку и назначить​
​ через меню​ VBA и записывает​ с этого сайта​ не хочется выполнять​ ячеек с условным​ разделителей слов следует​ текст может содержать​ товарооборот;​​ ним относятся Array,​ 10)​Do While x1 <​
​открывают вкладку «Вид»;​Следующее понятие — свойства.​Примеры по VBA​ Visual Basic.​ — только с​ ей нужный макрос.​Сервис — Макрос -​ получившуюся команду в​​ или еще откуда​ вручную.​ форматированием.​
​ использовать знаки подчеркивания.​ неточности и грамматические​SF и SP –​ IsArray; LBound; UBound.​Cells(i, 1).Value = i​ x2 (цикл будет​переходят на пиктограмму «Макросы»;​

exceltable.com

Создание макросов и пользовательских функций на VBA

Введение

​ Они являются необходимой​Более подробное описание по​​ теми значениями, которые​ Кнопка может быть​ Макросы — Выполнить​ программный модуль. Если​ нибудь:​В принципе, существует великое​Макрос для выделения ячеек​ Если используется имя​ ошибки. Для нас​ фактическая и планируемая​Функции VBA Excel для​ ^ 2 (т.е.​ выполняться пока верно​жмут на «Запись макроса»;​ характеристикой любого объекта.​ Excel VBA можно​Теперь у вас подключена​ мы передадим ей​ нескольких типов:​(Tools — Macro -​ мы включим макрорекордер​Модуль Эта книга​ множество языков программирования​ Excel по условию​ макроса, являющееся ссылкой​ важно, чтобы эта​ сумма издержек;​ строки. Это достаточно​ в ячейку (i,1)​ выражение x1 <​заполняют открывшуюся форму.​ Например, для Range​

​ найти на сайте​​ скрытая книга для​ как аргументы (исходные​Кнопка на панели инструментов​ Macros — Run)​ на запись, а​- также виден​ (Pascal, Fortran, C++,​ больше меньше.​ на ячейку, может​ статья была вам​IP и IF –​ многочисленная группа. В​ записывается значение квадрата​

​ x2)​Для простоты в поле​ — это Value​ Microsoft Office.​ хранения макросов, к​ данные для расчета).​ в Excel 2003​или с помощью​ затем начнем создавать​ в левом верхнем​ C#, Java, ASP,​2 исходных кода​ появиться сообщение об​ полезна. Просим вас​

Способ 1. Создание макросов в редакторе Visual Basic

​ планируемый и фактически​ нее входят, например,​ i)​y=x1 + x1^2 +​ «Имя макроса» оставляют​ или Formula.​Урок подготовлен для Вас​

• ​ которым можно получить​Чтобы создать пользовательскую функцию​ и старше​ кнопки​​ свой еженедельный отчет,​ углу редактора Visual​ ​ PHP…), но для​ макросов для выделения​​ ошибке, указывающее на​
• ​ уделить пару секунд​ уровень издержек.​ функции Space для​Next (в некотором смысле​​ 3*x1^3 – Cos(x1)​​ «Макрос1», а в​​Методы — это команды,​ командой сайта office-guru.ru​ доступ из любой​ для расчета, например,​​Откройте меню​Макросы (Macros)​ то макрорекордер начнет​​ Basic в окне,​​ всех программ пакета​ ячеек по условию​ недопустимое имя макроса..​ и сообщить, помогла​Обозначим теми же буквами,​ создания строки с​ играет роль счетчика​​Cells(i, 1).Value = x1​ ​ поле «Сочетание клавиш»​
  
  ​ показывающие, что требуется​

​Источник: http://www.excelfunctions.net/Excel-VBA-Tutorial.html​ другой рабочей книги.​ налога на добавленную​Сервис — Настройка​на вкладке​ записывать команды вслед​ которое называется Project​ Microsoft Office стандартом​

​ больше равно или​В списке​ ли она вам,​ но с «приставкой»​ числом пробелов, равных​ и означает еще​ (значение x1 записывается​ вставляют, например, hh​ сделать. При написании​Перевел: Антон Андронов​ Личная книга макросов​ стоимость (НДС) откроем​(Tools — Customize)​Разработчик (Developer)​ за каждым нашим​ Explorer. В этот​ является именно встроенный​ меньше равно относительно​Сохранить в​ с помощью кнопок​ Itog накопление итога​

• ​ целочисленному аргументу, или​​ один запуск цикла)​ в ячейку с​ (это значит, что​ кода в VBA​Автор: Антон Андронов​ где находится находиться​​ редактор VBA, добавим​​и перейдите на​или нажав ALT+F8.​ действием и, в​ модуль обычно записываются​ язык VBA. Команды​ их числовых значений.​выберите вариант​ внизу страницы. Для​ по данному столбцу.​ Asc для перевода​
  
• ​End Sub.​​ координатами (i,1))​ запустить программку можно​ их необходимо отделять​Немногие знают, что первая​ в папке автозагрузки​ новый модуль через​ вкладку​Сохранить в…​ итоге, мы получим​ макросы, которые должны​ этого языка понимает​Макрос для выборочного выделения​эта книга​
  
• ​ удобства также приводим​​ Например, ItogTP –​ символов в код​Если все сделано правильно,​Cells(i, 2).Value = y​ будет блиц-командой «Ctrl+h»).​ от объекта точкой.​ версия популярного продукта​​ файлов Excel –​​ меню​Команды (Commands)​- здесь задается​ макрос создающий отчет​ выполнятся при наступлении​ любое офисное приложение,​ ячеек на листе​.​
  

​ ссылку на оригинал​ касается столбца таблицы,​ ANSI. Все они​

​ в том числе​ (значение y записывается​ Нажимают Enter.​​ Например, как будет​​ Microsoft Excel появилась​

• ​ XLSTART: C:Documents and​Insert — Module​​. В категории​​ место, куда будет​ как если бы​ каких-либо событий в​ будь то Excel,​ Excel.​В поле​ (на английском языке).​
• ​ озаглавленного, как «планируемый​ имеют широкое применение​​ запись и запуск​​ в ячейку с​
• ​Теперь, когда уже запущена​​ показано в дальнейшем,​​ в 1985 году.​​ SettingsUser_NameAppDataRoamingMicrosoftExcelXLSTARTPersonal.xlsb​​и введем туда​Макросы​ сохранен текст макроса,​ он был написан​ книге (открытие или​ Word, Outlook или​Исходный код макроса​Сочетание клавиш​Для автоматизации повторяющихся задач,​ товарооборот».​ и позволяют работать​ макроса (см. инструкцию​ координатами (i,2))​ запись макроса, производят​ очень часто при​

​ С тех пор​Примечание. XLSTART – это​ текст нашей функции:​легко найти веселый​ т.е. набор команд​ программистом. Такой способ​ сохранение книги, печать​ Access.​ для автоматического выделения​введите прописную или​ можно выполнять повторяющиеся​Используя введенные обозначения, получаем​ со строками в​ выше), то при​i = i +​ копирование содержимого какой-либо​ программировании в «Эксель»​ он пережил несколько​ папка для автозагрузки​

Способ 2. Запись макросов макрорекордером

​Обратите внимание, что в​​ желтый «колобок» -​ на VBA из​ создания макросов не​ файла и т.п.):​Для ввода команд и​ отдельных ячеек по​ строчную букву, которую​ задачи с одним​ формулы для отклонений.​ «Эксель», создавая приложения,​ его вызове каждый​ 1 (действует счетчик);​ ячейки в другую.​ используют команду Cells(1,1).Select.​ модификаций и востребован​ файлов вместе с​ отличие от макросов​Настраиваемую кнопку​ которых и состоит​ требует знаний пользователя​Модуль листа​ формирования программы, т.е.​ заданному условию в​ хотите использовать.​ щелчком мыши, можно​ Если требуется осуществить​ значительно облегчающие работу​ раз будет получаться​x1 = x1 +​ Возвращаются на исходную​ Она означает, что​ у миллионов пользователей​ запуском программы Excel.​ функции имеют заголовок​(Custom button)​

• ​ макрос.:​ о программировании и​- доступен через​ создания макроса необходимо​ критериях поиска значений.​Примечание:​ использовать вкладку «Разработчик»​ расчет в %​
• ​ с этими таблицами.​ столбец заданного размера​ shag (аргумент изменяется​ пиктограмму. Нажимают на​ необходимо выбрать ячейку​ по всему миру.​ Если сохранить файл​Function​:​Эта книга​ VBA и позволяет​ Project Explorer и​
• ​ открыть специальное окно​ Как быстро выделять​ Выбранное сочетание клавиш заменяет​ в Excel для​ имеем (F –​Функции преобразования типа данных.​ (в данном случае​ на величину шага);​ «Запись макроса». Это​ с координатами (1,1)​ При этом многие​ в данную папку,​вместо​Перетащите ее к себе​- макрос сохраняется​

​ пользоваться макросами как​

• ​ через контекстное меню​ — редактор программ​ несмежные диапазоны макросом?​​ все совпадающие стандартные​ Mac для записи​ ​ P) / P​ Например, CVar возвращает​
• ​ состоящий из 10​Loop​ действие означает завершение​​ т.е. A1.​​ работают лишь с​​ то он будет​

​Sub​ на панель инструментов​ в модуль текущей​​ неким аналогом видеозаписи:​​ листа, т.е. правой​

• ​ на VBA, встроенный​​Макрос для добавления строк​ сочетания клавиш Excel​ и запуск макроса.​ * 100, а​ значение аргумента Expression,​ ячеек).​End Sub.​
• ​ программки.​​Вместе с ней нередко​ малой толикой возможностей​ открываться вместе с​и непустой список​ и затем щелкните​ книги и, как​ включил запись, выполнил​ кнопкой мыши по​​ в Microsoft Excel.​ с заданной высотой​ ​ на то время,​ Кроме того, можно​​ в сумме —​ преобразовав его в​​В повседневной жизни сплошь​​В результате запуска данного​​Далее:​​ используется Selection.ClearContents. Ее​
• ​ этого табличного процессора​​ программой Excel. Для​ аргументов (в нашем​ по ней правой​ следствие, будет выполнятся​ операци, перемотал пленку​ ярлычку листа -​В старых версиях (Excel​
• • ​ в таблицу Excel.​​ пока открыта книга,​ создать макрос с​ (F – P).​ тип данных Variant.​ и рядом возникает​ макроса в «Эксель»​вновь переходят на строку​
  • ​ выполнение означает очистку​​ и даже не​ версий старше 2007​ случае это​ кнопкой мыши. В​ только пока эта​ и запустил выполнение​ команда​ 2003 и старше)​Пошаговое руководство по​ содержащая соответствующий макрос.​ помощью редактор Visual​
  • ​Результаты этих вычислений можно​​Функции работы с датами.​ необходимость принять то​ получаем два столбца,​​ «Макросы»;​​ содержимого выбранной ячейки.​ догадываются, как им​ путь к папке​​Summa​​ контекстом меню можно​ книга открыта в​ тех же действий​Исходный текст (View Source)​ для этого идем​ написанию кода макроса​

​Введите описание макроса в​ Basic в Microsoft​ лучше всего сразу​ Они значительно расширяют​​ или иное решение​ ​ в первом из​​в списке выбирают «Макрос​

Запуск и редактирование макросов

​Прежде всего требуется создать​ могло бы облегчить​ автозагрузки будет следующим:​). После ввода кода​​ назначить кнопке макрос,​​ Excel​​ еще раз. Естественно​​. Сюда записывают макросы,​ в меню​ VBA для умной​​ поле​ Visual Basic для​ ​ внести в соответствующие​ стандартные возможности «Эксель».​​ в зависимости от​

• ​ которых записаны значения​ 1»;​ файл и сохранить​​ жизнь умение программирования​ ​ C:Program FilesMicrosoft OfficeOffice12Xlstart.​​ наша функция становится​
• ​ выбрать другой значок​​Новая книга​ ​ у такого способа​​ которые должны выполняться​Сервис — Макрос -​ вставки пустых строк​Описание​
• ​ приложений (VBA), чтобы​​ ячейки таблицы «Эксель».​ ​ Так, функция WeekdayName​​ какого-то условия. Не​ для x, а​нажимают «Выполнить» (то же​ его, присвоив имя​ в Excel.​

Создание кнопки для запуска макросов

​Если вам нужно записать​ доступна в обычном​ и имя:​- макрос сохраняется​ есть свои плюсы​ при наступлении определенных​ Редактор Visual Basic​

​ между ячейками таблицы.​и нажмите кнопку​ записать свои собственные​

​Для итогов по факту​​ возвращает название (полное​ ​ обойтись без них​​ во втором —​ действие запускается начатием​​ и выбрав тип​​Программирование в Excel осуществляется​​ в нее новый​​ окне Мастера функций​Кнопка на панели быстрого​​ в шаблон, на​ ​ и минусы:​​ событий на листе​

​(Toos — Macro -​ Как автоматически вставить​ОК​ программный код макроса.​ и прогнозу получают​ или частичное) дня​ и в VBA​ для y.​ сочетания клавиш «Ctrl+hh»).​

​ «Книга Excel с​ посредством языка программирования​ макрос просто откройте​

​ (​ доступа в Excel​ основе которого создается​Макрорекордер записывает только те​ (изменение данных в​ Visual Basic Editor)​​ строки через одну​.​ Если вы больше​​ по формулам ItogP=ItogP​

​ недели по его​ Excel. Примеры программ,​​Затем по ним строится​​В результате происходит действие,​ поддержкой макросов».​​ Visual Basic for​​ редактор, а потом​Вставка — Функция​ 2007 и новее​ любая новая пустая​

​ действия, которые выполняются​

​ ячейках, пересчет листа,​.​ ячейку?​Завершите запись макроса.​ не используете макроса,​ + P и​ номеру. Еще более​

• ​ где дальнейший ход​ график способом, стандартным​ которое было осуществлено​​Затем необходимо перейти в​​ Application, который изначально​​ откройте модуль книги​) в категории​Щелкните правой кнопкой мыши​ книга в Excel,​
• ​ в пределах окна​ копирование или удаление​В новых версиях (Excel​​Как сделать границы ячеек​​На вкладке​​ ее можно удалить.​​ ItogF=ItogF+ F.​

​ полезной является Timer.​​ выполнения алгоритма выбирается,​

​ для «Эксель».​ в процессе записи​ приложение VB, для​ встроен в самый​ Personal.xlsb. Уже записанные​Определенные пользователем (User Defined)​ по панели быстрого​ т.е. макрос будет​

Создание пользовательских функций на VBA

​ Microsoft Excel. Как​ листа и т.д.)​ 2007 и новее)​ макросом в таблице​Разработчик​При записи макроса все​Для отклонений используют =​ Он выдает число​ а не предопределен​Для реализации циклов в​ макроса.​ чего достаточно воспользоваться​ известный табличный процессор​ в нее макросы​:​ доступа в левом​ содержаться во всех​ только вы закрываете​Обычный макрос, введенный в​ для этого нужно​

​ Excel.​щелкните​ необходимые действия записываются​ (ItogF – ItogP)​ секунд, которые прошли​ изначально, чаще всего​ VBA Excel 2010,​​Имеет смысл увидеть, как​​ комбинацией клавиш «Alt»​ от Microsoft.​

​ удалять не нужно.​После выбора функции выделяем​ верхнем углу окна​​ новых книгах, создаваемых​​ Excel или переключаетесь​​ стандартный модуль выглядит​​ сначала отобразить вкладку​Как автоматически рисовать​Остановить запись​​ средством записи макроса.​​ / ItogP *​ с полуночи до​ используют конструкцию If​ как и в​ выглядит код. Для​​ и «F11». Далее:​​К его достоинствам специалисты​​ Они не будут​​ ячейки с аргументами​

​ Excel и выберите​ на данном компьютере​ в другую программу​ примерно так:​Разработчик (Developer)​ границы в таблицах​.​

planetaexcel.ru

Личная книга макросов в Excel и как ее использовать

​ Такими действиями может​ 100, если расчет​ конкретного момента дня.​ …Then (для сложных​ других версиях, наряду​ этого вновь переходят​в строке меню, расположенном​ относят сравнительную легкость​ между собой конфликтовать​ (с суммой, для​ команду​ начиная с текущего​ — запись останавливается.​Давайте разберем приведенный выше​. Выбираем​ с помощью макроса?​К началу страницы​ быть ввод текста​ ведется в процентах,​Функции для преобразования числового​ случаев) If …Then​ с уже приведенной​

Как сохранить макрос в личную книгу макросов

​ на строку «Макросы»​ в верхней части​ освоения. Как показывает​

1. ​ если соблюдать одно​
2. ​ которой надо посчитать​Настройка панели быстрого доступа​ момента​Макрорекордер может записать только​ в качестве примера​Файл — Параметры -​ Автоматизированное форматирование границ​
3. ​На вкладке​ или чисел, выбор​
4. ​ а в случае​ аргумента в разные​ …END If.​ конструкцией Do While​ и нажимают «Изменить»​ окна, нажимают на​ практика, азами VBA​ простое правило –​ НДС) как в​ (Customise Quick Access​Личная книга макросов​ те действия, для​ макрос​ Настройка ленты (File​ ячеек по разным​
5. ​Разработчик​ ячеек или команд​ суммарной величины —​ системы счисления. Например,​Рассмотрим конкретный случай. Предположим,​ используется For.​ или «Войти». В​ иконку рядом с​ могут овладеть даже​ в одном модуле​

​ случае с обычной​

​ Toolbar)​- это специальная​ которых есть команды​Zamena​ — Options -​ цветам, стилям и​нажмите кнопку​ на ленте или​ (ItogF – ItogP).​ Oct выдает в​ необходимо создать макрос​Рассмотрим программу, которая создаст​

​ результате оказываются в​ иконкой Excel;​ пользователи, которые не​ нельзя хранить макросы​ функцией:​:​ книга Excel с​ меню или кнопки​:​ Customize Ribbon)​ толщине линий используя​Макросы​ в меню, форматирование,​

​Результаты опять же сразу​ восьмеричное представление числа.​ для «Эксель», чтобы​ столбец. В каждой​ среде VBA. Собственно,​выбирают команду Mudule;​ имеют навыков профессионального​ с одинаковыми именами.​Большинство пользователей Excel знают,​Затем в открывшемся окне​ именем​ в Excel. Программист​Любой макрос должен начинаться​и включаем в​ макрос.​

exceltable.com

​.​

Introduction

This is a tutorial about writing code in Excel spreadsheets using Visual Basic for Applications (VBA).

Excel is one of Microsoft’s most popular products. In 2016, the CEO of Microsoft said  «Think about a world without Excel. That’s just impossible for me.” Well, maybe the world can’t think without Excel.

• In 1996, there were over 30 million users of Microsoft Excel (source).
• Today, there are an estimated 750 million users of Microsoft Excel. That’s a little more than the population of Europe and 25x more users than there were in 1996.

We’re one big happy family!

In this tutorial, you’ll learn about VBA and how to write code in an Excel spreadsheet using Visual Basic.

Prerequisites

You don’t need any prior programming experience to understand this tutorial. However, you will need:

• Basic to intermediate familiarity with Microsoft Excel
• If you want to follow along with the VBA examples in this article, you will need access to Microsoft Excel, preferably the latest version (2019) but Excel 2016 and Excel 2013 will work just fine.
• A willingness to try new things

Learning Objectives

Over the course of this article, you will learn:

1. What VBA is
2. Why you would use VBA
3. How to get set up in Excel to write VBA
4. How to solve some real-world problems with VBA

Important Concepts

Here are some important concepts that you should be familiar with to fully understand this tutorial.

Objects: Excel is object-oriented, which means everything is an object — the Excel window, the workbook, a sheet, a chart, a cell. VBA allows users to manipulate and perform actions with objects in Excel.

If you don’t have any experience with object-oriented programming and this is a brand new concept, take a second to let that sink in!

Procedures: a procedure is a chunk of VBA code, written in the Visual Basic Editor, that accomplishes a task. Sometimes, this is also referred to as a macro (more on macros below). There are two types of procedures:

• Subroutines: a group of VBA statements that performs one or more actions
• Functions: a group of VBA statements that performs one or more actions and returns one or more values

Note: you can have functions operating inside of subroutines. You’ll see later.

Macros: If you’ve spent any time learning more advanced Excel functionality, you’ve probably encountered the concept of a “macro.” Excel users can record macros, consisting of user commands/keystrokes/clicks, and play them back at lightning speed to accomplish repetitive tasks. Recorded macros generate VBA code, which you can then examine. It’s actually quite fun to record a simple macro and then look at the VBA code.

Please keep in mind that sometimes it may be easier and faster to record a macro rather than hand-code a VBA procedure.

For example, maybe you work in project management. Once a week, you have to turn a raw exported report from your project management system into a beautifully formatted, clean report for leadership. You need to format the names of the over-budget projects in bold red text. You could record the formatting changes as a macro and run that whenever you need to make the change.

What is VBA?

Visual Basic for Applications is a programming language developed by Microsoft. Each software program in the Microsoft Office suite is bundled with the VBA language at no extra cost. VBA allows Microsoft Office users to create small programs that operate within Microsoft Office software programs.

Think of VBA like a pizza oven within a restaurant. Excel is the restaurant. The kitchen comes with standard commercial appliances, like large refrigerators, stoves, and regular ole’ ovens — those are all of Excel’s standard features.

But what if you want to make wood-fired pizza? Can’t do that in a standard commercial baking oven. VBA is the pizza oven.

Yum.

Why use VBA in Excel?

Because wood-fired pizza is the best!

But seriously.

A lot of people spend a lot of time in Excel as a part of their jobs. Time in Excel moves differently, too. Depending on the circumstances, 10 minutes in Excel can feel like eternity if you’re not able to do what you need, or 10 hours can go by very quickly if everything is going great. Which is when you should ask yourself, why on earth am I spending 10 hours in Excel?

Sometimes, those days are inevitable. But if you’re spending 8-10 hours everyday in Excel doing repetitive tasks, repeating a lot of the same processes, trying to clean up after other users of the file, or even updating other files after changes are made to the Excel file, a VBA procedure just might be the solution for you.

You should consider using VBA if you need to:

• Automate repetitive tasks
• Create easy ways for users to interact with your spreadsheets
• Manipulate large amounts of data

Getting Set Up to Write VBA in Excel

Developer Tab

To write VBA, you’ll need to add the Developer tab to the ribbon, so you’ll see the ribbon like this.

To add the Developer tab to the ribbon:

1. On the File tab, go to Options > Customize Ribbon.
2. Under Customize the Ribbon and under Main Tabs, select the Developer check box.

After you show the tab, the Developer tab stays visible, unless you clear the check box or have to reinstall Excel. For more information, see Microsoft help documentation.

VBA Editor

Navigate to the Developer Tab, and click the Visual Basic button. A new window will pop up — this is the Visual Basic Editor. For the purposes of this tutorial, you just need to be familiar with the Project Explorer pane and the Property Properties pane.

Excel VBA Examples

First, let’s create a file for us to play around in.

1. Open a new Excel file
2. Save it as a macro-enabled workbook (. xlsm)
3. Select the Developer tab
4. Open the VBA Editor

Let’s rock and roll with some easy examples to get you writing code in a spreadsheet using Visual Basic.

Example #1: Display a Message when Users Open the Excel Workbook

In the VBA Editor, select Insert -> New Module

Write this code in the Module window (don’t paste!):

Sub Auto_Open()
MsgBox («Welcome to the XYZ Workbook.»)
End Sub

Save, close the workbook, and reopen the workbook. This dialog should display.

Ta da!

How is it doing that?

Depending on your familiarity with programming, you may have some guesses. It’s not particularly complex, but there’s quite a lot going on:

• Sub (short for “Subroutine): remember from the beginning, “a group of VBA statements that performs one or more actions.”
• Auto_Open: this is the specific subroutine. It automatically runs your code when the Excel file opens — this is the event that triggers the procedure. Auto_Open will only run when the workbook is opened manually; it will not run if the workbook is opened via code from another workbook (Workbook_Open will do that, learn more about the difference between the two).
• By default, a subroutine’s access is public. This means any other module can use this subroutine. All examples in this tutorial will be public subroutines. If needed, you can declare subroutines as private. This may be needed in some situations. Learn more about subroutine access modifiers.
• msgBox: this is a function — a group of VBA statements that performs one or more actions and returns a value. The returned value is the message “Welcome to the XYZ Workbook.”

In short, this is a simple subroutine that contains a function.

When could I use this?

Maybe you have a very important file that is accessed infrequently (say, once a quarter), but automatically updated daily by another VBA procedure. When it is accessed, it’s by many people in multiple departments, all across the company.

• Problem: Most of the time when users access the file, they are confused about the purpose of this file (why it exists), how it is updated so often, who maintains it, and how they should interact with it. New hires always have tons of questions, and you have to field these questions over and over and over again.
• Solution: create a user message that contains a concise answer to each of these frequently answered questions.

Real World Examples

• Use the MsgBox function to display a message when there is any event: user closes an Excel workbook, user prints, a new sheet is added to the workbook, etc.
• Use the MsgBox function to display a message when a user needs to fulfill a condition before closing an Excel workbook
• Use the InputBox function to get information from the user

Example #2: Allow User to Execute another Procedure

In the VBA Editor, select Insert -> New Module

Write this code in the Module window (don’t paste!):

Sub UserReportQuery()
Dim UserInput As Long
Dim Answer As Integer
UserInput = vbYesNo
Answer = MsgBox(«Process the XYZ Report?», UserInput)
If Answer = vbYes Then ProcessReport
End Sub

Sub ProcessReport()
MsgBox («Thanks for processing the XYZ Report.»)
End Sub

Save and navigate back to the Developer tab of Excel and select the “Button” option. Click on a cell and assign the UserReportQuery macro to the button.

Now click the button. This message should display:

Click “yes” or hit Enter.

Once again, tada!

Please note that the secondary subroutine, ProcessReport, could be anything. I’ll demonstrate more possibilities in example #3. But first…

How is it doing that?

This example builds on the previous example and has quite a few new elements. Let’s go over the new stuff:

• Dim UserInput As Long: Dim is short for “dimension” and allows you to declare variable names. In this case, UserInput is the variable name and Long is the data type. In plain English, this line means “Here’s a variable called “UserInput”, and it’s a Long variable type.”
• Dim Answer As Integer: declares another variable called “Answer,” with a data type of Integer. Learn more about data types here.
• UserInput = vbYesNo: assigns a value to the variable. In this case, vbYesNo, which displays Yes and No buttons. There are many button types, learn more here.
• Answer = MsgBox(“Process the XYZ Report?”, UserInput): assigns the value of the variable Answer to be a MsgBox function and the UserInput variable. Yes, a variable within a variable.
• If Answer = vbYes Then ProcessReport: this is an “If statement,” a conditional statement, which allows us to say if x is true, then do y. In this case, if the user has selected “Yes,” then execute the ProcessReport subroutine.

When could I use this?

This could be used in many, many ways. The value and versatility of this functionality is more so defined by what the secondary subroutine does.

For example, maybe you have a file that is used to generate 3 different weekly reports. These reports are formatted in dramatically different ways.

• Problem: Each time one of these reports needs to be generated, a user opens the file and changes formatting and charts; so on and so forth. This file is being edited extensively at least 3 times per week, and it takes at least 30 minutes each time it’s edited.
• Solution: create 1 button per report type, which automatically reformats the necessary components of the reports and generates the necessary charts.

Real World Examples

• Create a dialog box for user to automatically populate certain information across multiple sheets
• Use the InputBox function to get information from the user, which is then populated across multiple sheets

Example #3: Add Numbers to a Range with a For-Next Loop

For loops are very useful if you need to perform repetitive tasks on a specific range of values — arrays or cell ranges. In plain English, a loop says “for each x, do y.”

In the VBA Editor, select Insert -> New Module

Write this code in the Module window (don’t paste!):

Sub LoopExample()
Dim X As Integer
For X = 1 To 100
Range(«A» & X).Value = X
Next X
End Sub

Save and navigate back to the Developer tab of Excel and select the Macros button. Run the LoopExample macro.

This should happen:

Etc, until the 100th row.

How is it doing that?

• Dim X As Integer: declares the variable X as a data type of Integer.
• For X = 1 To 100: this is the start of the For loop. Simply put, it tells the loop to keep repeating until X = 100. X is the counter. The loop will keep executing until X = 100, execute one last time, and then stop.
• Range(«A» & X).Value = X: this declares the range of the loop and what to put in that range. Since X = 1 initially, the first cell will be A1, at which point the loop will put X into that cell.
• Next X: this tells the loop to run again

When could I use this?

The For-Next loop is one of the most powerful functionalities of VBA; there are numerous potential use cases. This is a more complex example that would require multiple layers of logic, but it communicates the world of possibilities in For-Next loops.

Maybe you have a list of all products sold at your bakery in Column A, the type of product in Column B (cakes, donuts, or muffins), the cost of ingredients in Column C, and the market average cost of each product type in another sheet.

You need to figure out what should be the retail price of each product. You’re thinking it should be the cost of ingredients plus 20%, but also 1.2% under market average if possible. A For-Next loop would allow you to do this type of calculation.

Real World Examples

• Use a loop with a nested if statement to add specific values to a separate array only if they meet certain conditions
• Perform mathematical calculations on each value in a range, e.g. calculate additional charges and add them to the value
• Loop through each character in a string and extract all numbers
• Randomly select a number of values from an array

Conclusion

Now that we’ve talked about pizza and muffins and oh-yeah, how to write VBA code in Excel spreadsheets, let’s do a learning check. See if you can answer these questions.

• What is VBA?
• How do I get set up to start using VBA in Excel?
• Why and when would you use VBA?
• What are some problems I could solve with VBA?

If you have a fair idea of how to you could answer these questions, then this was successful.

Whether you’re an occasional user or a power user, I hope this tutorial provided useful information about what can be accomplished with just a bit of code in your Excel spreadsheets.

Happy coding!

Learning Resources

• Excel VBA Programming for Dummies, John Walkenbach
• Get Started with VBA, Microsoft Documentation
• Learning VBA in Excel, Lynda

A bit about me

I’m Chloe Tucker, an artist and developer in Portland, Oregon. As a former educator, I’m continuously searching for the intersection of learning and teaching, or technology and art. Reach out to me on Twitter @_chloetucker and check out my website at chloe.dev.

---

---

Learn to code for free. freeCodeCamp’s open source curriculum has helped more than 40,000 people get jobs as developers. Get started

Приветствую на странице, которую каждый начинающий VBA-программист просто обязан добавить в закладки. Сейчас расскажу почему.

Макросы могут сэкономить массу времени. Можно автоматизировать небольшие задачи (ссылка на примеры), или создавать целые проекты автоматизации. Нажал кнопку и макрос выполнил работу целого отдела (вот я вообще не преувеличиваю).

Если Вы не знаете, что такое макрос в Excel и для чего они нужны, то рекомендую начать обучение с бесплатного самоучителя. Сборник готовых примеров, конечно, тоже поможет, но лучше начать с основ, а потом уже переходить к практике.

В этой огромной статье я собрал уже более 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

Назад к списку тем

---

Уже добавили страницу в закладки? Зря, я же пополняю список)