Excel вызов функции в ячейке

Встроенные функции VBA

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

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

• Откройте рабочую книгу Excel и запустите редактор VBA (нажмите для этого Alt+F11), и затем нажмите F2.
• В выпадающем списке в верхней левой части экрана выберите библиотеку VBA.
• Появится список встроенных классов и функций VBA. Кликните мышью по имени функции, чтобы внизу окна отобразилось её краткое описание. Нажатие F1 откроет страницу онлайн-справки по этой функции.

Кроме того, полный список встроенных функций VBA с примерами можно найти на сайте Visual Basic Developer Centre.

Пользовательские процедуры «Function» и «Sub» в VBA

В Excel Visual Basic набор команд, выполняющий определённую задачу, помещается в процедуру Function (Функция) или Sub (Подпрограмма). Главное отличие между процедурами Function и Sub состоит в том, что процедура Function возвращает результат, процедура Sub – нет.

Поэтому, если требуется выполнить действия и получить какой-то результат (например, просуммировать несколько чисел), то обычно используется процедура Function, а для того, чтобы просто выполнить какие-то действия (например, изменить форматирование группы ячеек), нужно выбрать процедуру Sub.

Аргументы

При помощи аргументов процедурам VBA могут быть переданы различные данные. Список аргументов указывается при объявлении процедуры. К примеру, процедура Sub в VBA добавляет заданное целое число (Integer) в каждую ячейку в выделенном диапазоне. Передать процедуре это число можно при помощи аргумента, вот так:

Sub AddToCells(i As Integer)

...

End Sub

Имейте в виду, что наличие аргументов для процедур Function и Sub в VBA не является обязательным. Для некоторых процедур аргументы не нужны.

Необязательные аргументы

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

Возвращаясь к предыдущему примеру, чтобы сделать целочисленный аргумент функции необязательным, его нужно объявить вот так:

Sub AddToCells(Optional i As Integer = 0)

В таком случае целочисленный аргумент i по умолчанию будет равен 0.

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

Передача аргументов по значению и по ссылке

Аргументы в VBA могут быть переданы процедуре двумя способами:

• ByVal – передача аргумента по значению. Это значит, что процедуре передаётся только значение (то есть, копия аргумента), и, следовательно, любые изменения, сделанные с аргументом внутри процедуры, будут потеряны при выходе из неё.
• ByRef – передача аргумента по ссылке. То есть процедуре передаётся фактический адрес размещения аргумента в памяти. Любые изменения, сделанные с аргументом внутри процедуры, будут сохранены при выходе из процедуры.

При помощи ключевых слов ByVal или ByRef в объявлении процедуры можно задать, каким именно способом аргумент передаётся процедуре. Ниже это показано на примерах:

Sub AddToCells(ByVal i As Integer)

...

End Sub

Sub AddToCells(ByRef i As Integer)

...

End Sub

Помните, что аргументы в VBA по умолчанию передаются по ссылке. Иначе говоря, если не использованы ключевые слова ByVal или ByRef, то аргумент будет передан по ссылке.

Перед тем как продолжить изучение процедур Function и Sub более подробно, будет полезным ещё раз взглянуть на особенности и отличия этих двух типов процедур. Далее приведены краткие обсуждения процедур VBA Function и Sub и показаны простые примеры.

VBA процедура «Function»

Редактор VBA распознаёт процедуру Function, когда встречает группу команд, заключённую между вот такими открывающим и закрывающим операторами:

Function

...

End Function

Как упоминалось ранее, процедура Function в VBA (в отличие от Sub), возвращает значение. Для возвращаемых значений действуют следующие правила:

• Тип данных возвращаемого значения должен быть объявлен в заголовке процедуры Function.
• Переменная, которая содержит возвращаемое значение, должна быть названа так же, как и процедура Function. Эту переменную не нужно объявлять отдельно, так как она всегда существует как неотъемлемая часть процедуры Function.

Это отлично проиллюстрировано в следующем примере.

Пример VBA процедуры «Function»: Выполняем математическую операцию с 3 числами

Ниже приведён пример кода VBA процедуры Function, которая получает три аргумента типа Double (числа с плавающей точкой двойной точности). В результате процедура возвращает ещё одно число типа Double, равное сумме первых двух аргументов минус третий аргумент:

Function SumMinus(dNum1 As Double, dNum2 As Double, dNum3 As Double) As Double

   SumMinus = dNum1 + dNum2 - dNum3

End Function

Эта очень простая VBA процедура Function иллюстрирует, как данные передаются процедуре через аргументы. Можно увидеть, что тип данных, возвращаемых процедурой, определён как Double (об этом говорят слова As Double после списка аргументов). Также данный пример показывает, как результат процедуры Function сохраняется в переменной с именем, совпадающим с именем процедуры.

Вызов VBA процедуры «Function»

Если рассмотренная выше простая процедура Function вставлена в модуль в редакторе Visual Basic, то она может быть вызвана из других процедур VBA или использована на рабочем листе в книге Excel.

Вызов VBA процедуры «Function» из другой процедуры

Процедуру Function можно вызвать из другой VBA процедуры при помощи простого присваивания этой процедуры переменной. В следующем примере показано обращение к процедуре SumMinus, которая была определена выше.

Sub main()

   Dim total as Double
   total = SumMinus(5, 4, 3)

End Sub

Вызов VBA процедуры «Function» из рабочего листа

VBA процедуру Function можно вызвать из рабочего листа Excel таким же образом, как любую другую встроенную функцию Excel. Следовательно, созданную в предыдущем примере процедуру Function – SumMinus можно вызвать, введя в ячейку рабочего листа вот такое выражение:

=SumMinus(10, 5, 2)

VBA процедура «Sub»

Редактор VBA понимает, что перед ним процедура Sub, когда встречает группу команд, заключённую между вот такими открывающим и закрывающим операторами:

VBA процедура «Sub»: Пример 1. Выравнивание по центру и изменение размера шрифта в выделенном диапазоне ячеек

Рассмотрим пример простой VBA процедуры Sub, задача которой – изменить форматирование выделенного диапазона ячеек. В ячейках устанавливается выравнивание по центру (и по вертикали, и по горизонтали) и размер шрифта изменяется на заданный пользователем:

Sub Format_Centered_And_Sized(Optional iFontSize As Integer = 10)

   Selection.HorizontalAlignment = xlCenter
   Selection.VerticalAlignment = xlCenter
   Selection.Font.Size = iFontSize

End Sub

Данная процедура Sub выполняет действия, но не возвращает результат.

В этом примере также использован необязательный (Optional) аргумент iFontSize. Если аргумент iFontSize не передан процедуре Sub, то его значение по умолчанию принимается равным 10. Однако же, если аргумент iFontSize передается процедуре Sub, то в выделенном диапазоне ячеек будет установлен размер шрифта, заданный пользователем.

VBA процедура «Sub»: Пример 2. Выравнивание по центру и применение полужирного начертания к шрифту в выделенном диапазоне ячеек

Следующая процедура похожа на только что рассмотренную, но на этот раз, вместо изменения размера, применяется полужирное начертание шрифта в выделенном диапазоне ячеек. Это пример процедуры Sub, которой не передаются никакие аргументы:

Sub Format_Centered_And_Bold()

   Selection.HorizontalAlignment = xlCenter
   Selection.VerticalAlignment = xlCenter
   Selection.Font.Bold = True

End Sub

Вызов процедуры «Sub» в Excel VBA

Вызов VBA процедуры «Sub» из другой процедуры

Чтобы вызвать VBA процедуру Sub из другой VBA процедуры, нужно записать ключевое слово Call, имя процедуры Sub и далее в скобках аргументы процедуры. Это показано в примере ниже:

Sub main()

   Call Format_Centered_And_Sized(20)

End Sub

Если процедура Format_Centered_And_Sized имеет более одного аргумента, то они должны быть разделены запятыми. Вот так:

Sub main()

   Call Format_Centered_And_Sized(arg1, arg2, ...)

End Sub

Вызов VBA процедуры «Sub» из рабочего листа

Процедура Sub не может быть введена непосредственно в ячейку листа Excel, как это может быть сделано с процедурой Function, потому что процедура Sub не возвращает значение. Однако, процедуры Sub, не имеющие аргументов и объявленные как Public (как будет показано далее), будут доступны для пользователей рабочего листа. Таким образом, если рассмотренные выше простые процедуры Sub вставлены в модуль в редакторе Visual Basic, то процедура Format_Centered_And_Bold будет доступна для использования на рабочем листе книги Excel, а процедура Format_Centered_And_Sized – не будет доступна, так как она имеет аргументы.

Вот простой способ запустить (или выполнить) процедуру Sub, доступную из рабочего листа:

• Нажмите Alt+F8 (нажмите клавишу Alt и, удерживая её нажатой, нажмите клавишу F8).
• В появившемся списке макросов выберите тот, который хотите запустить.
• Нажмите Выполнить (Run)

Чтобы выполнять процедуру Sub быстро и легко, можно назначить для неё комбинацию клавиш. Для этого:

• Нажмите Alt+F8.
• В появившемся списке макросов выберите тот, которому хотите назначить сочетание клавиш.
• Нажмите Параметры (Options) и в появившемся диалоговом окне введите сочетание клавиш.
• Нажмите ОК и закройте диалоговое окно Макрос (Macro).

Внимание: Назначая сочетание клавиш для макроса, убедитесь, что оно не используется, как стандартное в Excel (например, Ctrl+C). Если выбрать уже существующее сочетание клавиш, то оно будет переназначено макросу, и в результате пользователь может запустить выполнение макроса случайно.

Область действия процедуры VBA

В части 2 данного самоучителя обсуждалась тема области действия переменных и констант и роль ключевых слов Public и Private. Эти ключевые слова так же можно использовать применительно к VBA процедурам:

Public Sub AddToCells(i As Integer)

...

End Sub

Private Sub AddToCells(i As Integer)

...

End Sub

Помните о том, что если перед объявлением VBA процедуры Function или Sub ключевое слово не вставлено, то по умолчанию для процедуры устанавливается свойство Public (то есть она будет доступна везде в данном проекте VBA). В этом состоит отличие от объявления переменных, которые по умолчанию бывают Private.

Ранний выход из VBA процедур «Function» и «Sub»

Если нужно завершить выполнение VBA процедуры Function или Sub, не дожидаясь её естественного финала, то для этого существуют операторы Exit Function и Exit Sub. Применение этих операторов показано ниже на примере простой процедуры Function, в которой ожидается получение положительного аргумента для выполнения дальнейших операций. Если процедуре передано не положительное значение, то дальнейшие операции не могут быть выполнены, поэтому пользователю должно быть показано сообщение об ошибке и процедура должна быть тут же завершена:

Function VAT_Amount(sVAT_Rate As Single) As Single

   VAT_Amount = 0
   If sVAT_Rate <= 0 Then
      MsgBox "Expected a Positive value of sVAT_Rate but Received " & sVAT_Rate
      Exit Function
   End If

...

End Function

Обратите внимание, что перед тем, как завершить выполнение процедуры Function – VAT_Amount, в код вставлена встроенная VBA функция MsgBox, которая показывает пользователю всплывающее окно с предупреждением.

В Excel более 450 функций, и некоторые из них весьма полезны в вашей повседневной работе.

Но… Excel дает вам возможность создавать пользовательские функции с помощью VBA.

Да — да, вы не ослышались. Пользовательская функция.

И я могу сказать со 100%-ой уверенностью, что каждый начинающий пользователь VBA хочет научиться создавать пользовательские функции. Не так ли? Кивните, если вы один из них.

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

… так что оставайтесь со мной, вы станете рок-звездой VBA в ближайшие пару минут.

Зачем вам создавать пользовательскую функцию Excel?

Как я уже сказал, в Excel много функций, которые могут помочь вам решить практически все проблемы и выполнить все виды расчетов. Но…

… Иногда в определенных ситуациях вам нужно создать пользовательскую.

Вот некоторые причины, почему вам нужно перейти к пользовательской функции.

1. Когда нет подходящей функции

Иногда бывает, что вам нужно что-то вычислить, и для этого нет подходящей встроенной функции.

Например, подсчет слов в ячейке, в этом случае пользовательская функция — идеальное решение.

Function MyWordCount(rng As Range) As Integer

MyWordCount = UBound(Split(rng.Value, " "), 1) + 1

End Function

2. Заменить сложную формулу

Если вы работаете с формулами, то вы знаете, что сложные формулы бывает трудно читать самому, а другим пользователем еще сложнее.

Пользовательская функция может решить эту проблему.

Такая функция поможет вам избежать долгих вычислений. Как только вы создадите функцию, вам не нужно будет писать эту сложную формулу снова и снова.

3. Когда вы не хотите использовать SUB

Хотя вы можете использовать код VBA для выполнения расчетов, но коды VBA не динамические.

Вам нужно снова запустить этот код, если вы хотите обновить свой расчет.

Но если вы преобразуете этот код в функцию, вам не нужно будет запускать этот код снова и снова.

Как создать свою первую пользовательскую функцию в Excel

Обычно для создания функции VBA необходимо выполнить следующие шаги:

• Объявить вашу процедуру как функцию
• Определить ее аргументы и их тип данных
• Добавить код для расчета желаемого значения

Позвольте мне привести вам простой пример.

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

Да, у нас есть функция, которая возвращает номер дня недели, но не название.

Итак, давайте создадим эту функцию VBA, используя следующие шаги.

• Прежде всего, откройте редактор VB с помощью сочетания клавиш ALT + F11 или перейдите на вкладку «Разработчик» и нажмите кнопку «Visual Basic».

• Вставка модуля: щелкните правой кнопкой мыши в окне проекта VBA, затем перейдите к Insert и после этого нажмите «Module».

• Следующим шагом является определение имени для функции, здесь я использую «myDayName». Поэтому вы должны написать «Function mydayName».

Почему «Function» перед именем?

Поскольку вы создаете функцию VBA, то используете слово «Function». Excel понимает, что этот код следует рассматривать как функцию

• После этого вам нужно определить аргументы для пользовательской функции. Поэтому вставьте начальные скобки и напишите «InputDate As Date».

• Здесь InputDate — имя аргумента, а date — его тип данных. Всегда лучше определить тип данных для аргумента.

• Теперь закройте скобки и напишите «As String». Здесь вы определяете тип данных результата, возвращаемого функцией. Так как вы хотите, чтобы название дня недели было текстовым, его тип данных должен быть «String».

• В конце нажмите ENTER.

На этом этапе имя вашей функции, ее аргумент, тип данных аргумента и тип данных функции определены, и у вы должны видеть что-то вроде этого в вашем модуле:

Теперь между «Function» и «End Function» вам нужно сделать расчет.

В Excel есть функция рабочего листа под названием «Text», давайте используем ее здесь. Для этого вам нужно написать следующий код:

myDayName = WorksheetFunction.Text (InputDate, "dddddd")

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

• Теперь закройте редактор VB и вернитесь к рабочему листу.

• В ячейке B2 введите «= myDayName (A2)», нажмите Enter, и у вы увидите название дня недели.

Поздравляю! Вы только что создали свою первую пользовательскую функцию!

Как эта функция работает и возвращает значение в ячейке

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

Можно сказать в двух словах, это код VBA, но мы используем его как функцию. Давайте разбираться.

• Вы вводите код в ячейку как функцию и указываете ссылку на ячейку
• Excel запускает код функции и использует значение, которое вы указали
• Вы получаете результат в ячейке

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

Давайте чуть медленнее:

Есть код для функции, которую мы создали, и вы знаете, что в этом коде. Правильно?

Когда вы ссылаетесь на ячейку в вашей функции, этот блок кода работает для вычисления значения. Он берет дату из аргумента InputDate и возвращает название дня недели.

Важно: когда вы пишете код для пользовательской функции, вам нужно позаботиться о том, чтобы значение, возвращаемое этим кодом, было присвоено имени функции.

Как улучшить пользовательскую функцию?

Вы уже знаете, как создать пользовательскую функцию VBA. Но…

Есть одна вещь, о которой вы должны позаботиться: код, который вы используете должен быть достаточно хорош, чтобы использовать все возможности.

Если говорить о функции, которую вы только что написали выше, да вы можете вернуть название дня недели из даты. Но… Что если указанное вами значение не будет датой? А если указанная вами ячейка пуста?

Могут быть и другие проблемы, но я уверен, что вы поняли, о чем я.

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

Прежде всего, вам нужно изменить тип данных аргумента и использовать:

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

Далее нам нужно использовать оператор VBA IF, чтобы проверить InputDate для некоторых условий. Первое условие — пустая ячейка или нет. И для этого вам нужно использовать следующий код:

If InputDate = "" Then
myDayName = ""

Функция ничего не будет возвращать, если указанная вами ячейка будет пустой. Одна проблема решена, давайте перейдем к следующей.

Помимо даты есть возможности, что значение может быть числом или текстом. Поэтому необходимо создать условие, которое будет проверять, является ли указанное значение действительной датой или нет. Код такой:

If IsDate (InputDate) = False Then
myDateName = ""

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

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

Функция myDayName (InputDate As Variant) в виде строки

Function myDayName(InputDate As Variant) As String
If InputDate = "" Then
myDayName = ""
Else
If IsDate(InputDate) = False Then
myDateName = ""
Else
myDayName = WorksheetFunction.Text(InputDate, "dddddd")
End If
End If
End Function

Я думаю, что вы можно внести еще некоторые изменения в эту функцию, но я уверен, что суть вы уловили.

Как использовать пользовательскую функцию VBA

Научившись создавать функцию VBA в Excel, нужно узнать, как вы можете ее использовать. И в этой части статьи я расскажу вам, как и где вы можете это делать.

Итак, давайте начнем.

1. На рабочем листе

Почему мы создаем пользовательскую функцию? Чтобы использовать ее на рабочем листе. Вы можете просто использовать ПФ на листе, используя знак равенства и введя имя функции, а затем указав ее аргументы.

Вы также можете ввести пользовательскую функцию из библиотеки функций.

Перейдите на вкладку «Формулы» ➜ «Вставить функцию» ➜ «Определенные пользователем».

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

2. Использование в других подпроцедурах и функциях

Вы также можете использовать функцию в других функциях или в процедуре «Sub».

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

Sub todayDay()
MsgBox "Сегодня " & myDayName(Date)
End Sub

3. Доступ к функциям из другой книги

Если у вас есть ПФF в одной рабочей книге и вы хотите использовать его в другой или во всех рабочих книгах, вы делаете это путем создания надстройки для нее. Выполните следующие простые шаги:

• Прежде всего, вам нужно сохранить файл (в котором у вас есть код пользовательской функции) в виде надстройки.
• Для этого перейдите на вкладку «Файл» ➜ «Сохранить как» ➜ «Надстройки Excel (.xalm)».

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

Теперь вы можете использовать все свои функции VBA в любой книге.

Различные способы создания пользовательской функции VBA

Когда мы используем встроенные функции, они имеют разные типы аргументов. В этом разделе руководства вы узнаете, как создать ПФ с аргументами другого типа.

• без каких-либо аргументов
• только с одним аргументом
• с несколькими аргументами
• использование массива в качестве аргумента

1. Без каких-либо аргументов

Помните есть такие функции, как СЕЙЧАС и СЕГОДНЯ, в которых вам не нужно вводить какие-либо аргументы? Вы можете создать пользовательскую функцию, в которой вам тоже не нужно вводить аргумент. Сделаем это на примере:

Давайте создадим пользовательскую функцию, которая может возвращать местоположение текущего файла.

Вот код:

Function myPath() As String
Dim myLocation As String
Dim myName As String
myLocation = ActiveWorkbook.FullName
myName = ActiveWorkbook.Name
If myLocation = myName Then
myPath = "Файл еще не сохранен."
Else
myPath = myLocation
End If
End Function

Эта функция возвращает путь к месту, где хранится текущий файл, и, если рабочая книга нигде не сохранена, будет отображаться сообщение «Файл еще не сохранен».

Теперь, если вы обратите пристальное внимание на код этой функции, вы не увидите ни одного аргумента (в скобках). Вы определяете тип данных для результата функции. Основное правило создания функции без аргументов — это код, в который вам не нужно ничего вводить. Проще говоря, значение, которое вы хотите получить взамен функции, должно вычисляться автоматически.

Этот код «ActiveWorkbook.FullName» возвращает местоположение файла, а этот «ActiveWorkbook.Name» возвращает имя. Так что здесь вам не нужно ничего вводить.

2. Только с одним аргументом

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

Это функция нужна для извлечения URL-адреса из гиперссылки.

Function giveMeURL(rng As Range) As String
On Error Resume Next
giveMeURL = rng.Hyperlinks(1).Address
End Function

В этой функции у вас есть только один аргумент.

Когда вы напишите функцию, а затем укажите ячейку, в которой у вас есть гиперссылка, она вернет URL-адрес.

Теперь в этой функции основная работа выполняется:

rng.Hyperlinks (1) .Address

rng ​​- это то, что вам нужно указать.

3. С несколькими аргументами

Обычно большинство встроенных функций Excel имеют несколько аргументов. Поэтому вам необходимо узнать, как создать пользовательскую функцию с несколькими аргументами. Давайте рассмотрим пример:

Вы хотите удалить определенные буквы из текстовой строки и получить оставшуюся часть. У вас есть такие функции, как RIGHT и LEN, которые вы собираетесь использовать в этой пользовательской функции. Но здесь они нам не понадобятся. Все, что нам нужно, это пользовательская функция, использующая VBA.

Итак, вот функция:

Function removeFirstC(rng As String, cnt As Long) As String
removeFirstC = Right(rng, Len(rng) - cnt)
End Function

Итак, посмотрим:

В этой функции у вас два аргумента:

• rng: в этом аргументе вам нужно указать ячейку, из которой вы хотите удалить символ текста.
• cnt: а в этом аргументе вам нужно указать количество символов для удаления (если вы хотите удалить более одного символа из текста).

Когда вы вводите ее в ячейку, она работает примерно так:

3.1 Создание пользовательской функции с необязательным и обязательным аргументом

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

Но можно сделать этот аргумент необязательным, чтобы он принимал значение по умолчанию. Чтобы сделать аргумент необязательным, вам просто нужно добавить «Optional» перед ним.

4. Использование массива в качестве аргумента

Есть несколько встроенных функций, которые могут принимать аргументы в виде массива, также вы можете сделать свою собственную функцию VBA. Давайте рассмотрим простой пример: вам нужно создать функцию, в которой вы суммируете значения из диапазона, в котором у вас есть числа и текст.

Function addNumbers(CellRef As Range)
Dim Cell As Range
For Each Cell In CellRef
If IsNumeric(Cell.Value) = True Then
Result = Result + Cell.Value
End If
Next Cell
addNumbers = Result
End Function

В приведенном выше коде функции мы использовали весь диапазон A1: A10 вместо одного значения или ссылки на ячейку.

Используем цикл FOR EACH, он проверяет каждую ячейку диапазона и суммирует значение, если в ячейке есть число.

Область действия определяемой пользователем функции

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

1. Public

Вы можете сделать свою пользовательскую функцию общедоступной, чтобы ее можно было вызывать во всех рабочих листах рабочей книги. Для этого вам просто нужно использовать слово «Public», как показано ниже.

Функция является Public по умолчанию, если вы не делаете ее Private. Во всех приведенных нами примерах все функции общедоступны.

2. Private

Когда вы делаете функцию Private, вы можете использовать ее в процедурах того же модуля.

Допустим, если у вас есть функция в «Module1», вы можете использовать ее только в процедурах, которые вы используете в «Module1». И она не появится в списке функций на рабочем листе (когда вы используете знак = и пытаетесь ввести имя), но вы все равно можете использовать ее, введя ее название полностью и указав аргументы.

Ограничения пользовательской функции

Пользовательские функции супер полезны. Но они ограничены в некоторых ситуациях. Вот несколько вещей, которые нужно записать и запомнить при создании пользовательской функции в VBA:

• Вы не можете изменять, удалять или форматировать ячейки и диапазон с помощью пользовательской функции.
• Также нельзя перемещать, переименовывать, удалять или добавлять рабочие листы в рабочую книгу.
• Не сможете вносить изменения в значение другой ячейки.

Есть ли разница между встроенной функцией и пользовательской функцией?

Чтобы ответить на этот вопрос, я хочу поделиться некоторыми моментами, которые, на мой взгляд, важны.

• Медленнее, чем встроенная. Если вы сравните скорость встроенных функций и функции VBA, вы обнаружите, что первые быстрее. Причина в том, что встроенные функции написаны с использованием C ++ или FORTRAN.
• Трудно обмениваться файлами. Мы часто обмениваемся файлами по электронной почте и в облаке, поэтому, если вы используете какую-либо из пользовательских функций, вам необходимо поделиться этим файлом в формате «xlam», чтобы другой человек также мог использовать вашу пользовательскую функцию.

Но все равно, есть ситуации, когда пользовательские функции будут незаменимы.

Заключение

Создать пользовательскую функцию просто.

Все, что вам нужно сделать, это использовать «Function» перед названием, чтобы определить его как функцию, добавить аргументы, определить тип данных аргументов, а затем определить тип данных для возвращаемого значения.

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

Это самое простое руководство, как создать пользовательскую функцию в VBA, и я надеюсь, вы нашли ее полезной.

Введение

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

Макрос — это запрограммированная последовательность действий (программа, процедура), записанная на языке программирования Visual Basic for Applications (VBA). Мы можем запускать макрос сколько угодно раз, заставляя Excel выполнять последовательность любых  нужных нам действий, которые нам не хочется выполнять вручную.

В принципе, существует великое множество языков программирования (Pascal, Fortran, C++, C#, Java, ASP, PHP…), но для всех программ пакета Microsoft Office стандартом является именно встроенный язык VBA. Команды этого языка понимает любое офисное приложение, будь то Excel, Word, Outlook или Access.

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

Для ввода команд и формирования программы, т.е. создания макроса необходимо открыть специальное окно — редактор программ на VBA, встроенный в Microsoft Excel.

• В старых версиях (Excel 2003 и старше) для этого идем в меню Сервис — Макрос — Редактор Visual Basic (Toos — Macro — Visual Basic Editor).
• В новых версиях (Excel 2007 и новее) для этого нужно сначала отобразить вкладку Разработчик (Developer). Выбираем Файл — Параметры — Настройка ленты (File — Options — Customize Ribbon) и включаем в правой части окна флажок Разработчик (Developer). Теперь на появившейся вкладке нам будут доступны основные инструменты для работы с макросами, в том числе и нужная нам кнопка Редактор Visual Basic (Visual Basic Editor)
  
  
  
  :

К сожалению, интерфейс редактора VBA и файлы справки не переводятся компанией  Microsoft на русский язык, поэтому с английскими командами в меню и окнах придется смириться:

Макросы (т.е. наборы команд на языке VBA) хранятся в программных модулях. В любой книге Excel мы можем создать любое количество программных модулей и разместить там наши макросы. Один модуль может содержать любое количество макросов. Доступ ко всем модулям осуществляется с помощью окна Project Explorer в левом верхнем углу редактора (если его не видно, нажмите CTRL+R). Программные модули бывают нескольких типов для разных ситуаций:

• Обычные модули — используются в большинстве случаев, когда речь идет о макросах. Для создания такого модуля выберите в меню Insert — Module. В появившееся окно нового пустого модуля можно вводить команды на VBA, набирая их с клавиатуры или копируя их из другого модуля, с этого сайта или еще откуда нибудь:

  

• Модуль Эта книга — также виден в левом верхнем углу редактора Visual Basic в окне, которое называется Project Explorer. В этот модуль обычно записываются макросы, которые должны выполнятся при наступлении каких-либо событий в книге (открытие или сохранение книги, печать файла и т.п.):

  

• Модуль листа — доступен через Project Explorer и через контекстное меню листа, т.е. правой кнопкой мыши по ярлычку листа — команда Исходный текст (View Source). Сюда записывают макросы, которые должны выполняться при наступлении определенных событий на листе (изменение данных в ячейках, пересчет листа, копирование или удаление листа и т.д.)

  

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

Давайте разберем приведенный выше в качестве примера макрос Zamena:

• Любой макрос должен начинаться с оператора Sub, за которым идет имя макроса и список аргументов (входных значений) в скобках. Если аргументов нет, то скобки надо оставить пустыми.
• Любой макрос должен заканчиваться оператором End Sub.
• Все, что находится между Sub и End Sub — тело макроса, т.е. команды, которые будут выполняться при запуске макроса. В данном случае макрос выделяет ячейку заливает выделенных диапазон (Selection) желтым цветом (код = 6) и затем проходит в цикле по всем ячейкам, заменяя формулы на значения. В конце выводится окно сообщения (MsgBox).

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

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

Макрорекордер — это небольшая программа, встроенная в Excel, которая переводит любое действие пользователя на язык программирования VBA и записывает получившуюся команду в программный модуль. Если мы включим макрорекордер на запись, а затем начнем создавать свой еженедельный отчет, то макрорекордер начнет записывать команды вслед за каждым нашим действием и, в итоге, мы получим макрос создающий отчет как если бы он был написан программистом. Такой способ создания макросов не требует знаний пользователя о программировании и VBA и позволяет пользоваться макросами как неким аналогом видеозаписи: включил запись, выполнил операци, перемотал пленку и запустил выполнение тех же действий еще раз. Естественно у такого способа есть свои плюсы и минусы:

• Макрорекордер записывает только те действия, которые выполняются в пределах окна Microsoft Excel. Как только вы закрываете Excel или переключаетесь в другую программу — запись останавливается.
• Макрорекордер может записать только те действия, для которых есть команды меню или кнопки в Excel. Программист же может написать макрос, который делает то, что Excel никогда не умел (сортировку по цвету, например или что-то подобное).
• Если во время записи макроса макрорекордером вы ошиблись — ошибка будет записана. Однако смело можете давить на кнопку отмены последнего действия (Undo) — во время записи макроса макрорекордером она не просто возрвращает Вас в предыдущее состояние, но и стирает последнюю записанную команду на VBA.

Чтобы включить запись необходимо:

• в Excel 2003 и старше — выбрать в меню Сервис — Макрос — Начать запись (Tools — Macro — Record New Macro)
• в Excel 2007 и новее — нажать кнопку Запись макроса (Record macro) на вкладке Разработчик (Developer)

Затем необходимо настроить параметры записываемого макроса в окне Запись макроса:

• Имя макроса — подойдет любое имя на русском или английском языке. Имя должно начинаться с буквы и не содержать пробелов и знаков препинания.
• Сочетание клавиш — будет потом использоваться для быстрого запуска макроса. Если забудете сочетание или вообще его не введете, то макрос можно будет запустить через меню Сервис — Макрос — Макросы — Выполнить (Tools — Macro — Macros — Run) или с помощью кнопки Макросы (Macros) на вкладке Разработчик (Developer) или нажав ALT+F8.
• Сохранить в… — здесь задается место, куда будет сохранен текст макроса, т.е. набор команд на VBA из которых и состоит макрос.:
• Эта книга — макрос сохраняется в модуль текущей книги и, как следствие, будет выполнятся только пока эта книга открыта в Excel
• Новая книга — макрос сохраняется в шаблон, на основе которого создается любая новая пустая книга в Excel, т.е. макрос будет содержаться во всех новых книгах, создаваемых на данном компьютере начиная с текущего момента
• Личная книга макросов — это специальная книга Excel  с именем Personal.xls, которая используется как хранилище макросов. Все макросы из Personal.xls загружаются в память при старте Excel и могут быть запущены в любой момент и в любой книге.

После включения записи и выполнения действий, которые необходимо записать, запись можно остановить командой Остановить запись (Stop Recording).

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

Управление всеми доступными макросами производится в окне, которое можно открыть с помощью кнопки Макросы (Macros) на вкладке Разработчик (Developer) или — в старых версиях Excel — через меню Сервис — Макрос — Макросы (Tools — Macro — Macros):

• Любой выделенный в списке макрос можно запустить кнопкой Выполнить (Run).
• Кнопка Параметры (Options) позволяет посмотреть и отредактировать сочетание клавиш для быстрого запуска макроса.
• Кнопка Изменить (Edit) открывает редактор Visual Basic (см. выше) и позволяет просмотреть и отредактировать текст макроса на VBA.

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

Чтобы не запоминать сочетание клавиш для запуска макроса, лучше создать кнопку и назначить ей нужный макрос. Кнопка может быть нескольких типов:

Кнопка на панели инструментов в Excel 2003 и старше

Откройте меню Сервис — Настройка (Tools — Customize) и перейдите на вкладку Команды (Commands). В категории Макросы легко найти веселый желтый «колобок» — Настраиваемую кнопку (Custom button):

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

Кнопка на панели быстрого доступа в Excel 2007 и новее

Щелкните правой кнопкой мыши по панели быстрого доступа в левом верхнем углу окна Excel и выберите команду Настройка панели быстрого доступа (Customise Quick Access Toolbar):

Затем в открывшемся окне выберите категорию Макросы и при помощи кнопки Добавить (Add) перенесите выбранный макрос в правую половину окна, т.е. на панель быстрого доступа:

Кнопка на листе

Этот способ подходит для любой версии Excel. Мы добавим кнопку запуска макроса прямо на рабочий лист, как графический объект. Для этого:

• В Excel 2003 и старше — откройте панель инструментов Формы через меню Вид — Панели инструментов — Формы (View — Toolbars — Forms)
• В Excel 2007 и новее — откройте выпадающий список Вставить (Insert) на вкладке Разработчик (Developer) 

Выберите объект Кнопка (Button):

Затем нарисуйте кнопку на листе, удерживая левую кнопку мыши. Автоматически появится окно, где нужно выбрать макрос, который должен запускаться при щелчке по нарисованной кнопке.

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

Создание пользовательских функций или, как их иногда еще называют, UDF-функций (User Defined Functions) принципиально не отличается от создания макроса в обычном программном модуле. Разница только в том, что макрос выполняет последовательность действий с объектами книги (ячейками, формулами и значениями, листами, диаграммами и т.д.), а пользовательская функция — только с теми значениями, которые мы передадим ей как аргументы (исходные данные для расчета).

Чтобы создать пользовательскую функцию для расчета, например, налога на добавленную стоимость (НДС) откроем редактор VBA, добавим новый модуль через меню Insert — Module и введем туда текст нашей функции:

Обратите внимание, что в отличие от макросов функции имеют заголовок Function вместо Sub и непустой список аргументов (в нашем случае это Summa). После ввода кода наша функция становится доступна в обычном окне Мастера функций (Вставка — Функция) в категории Определенные пользователем (User Defined):

После выбора функции выделяем ячейки с аргументами (с суммой, для которой надо посчитать НДС) как в случае с обычной функцией:

Возможности Эксель позволяют не только создавать и редактировать таблицы, но и производить всевозможные расчеты: математические, финансовые, статистические и т.д. Делается это с помощью формул или функций (операторов), для выбора и настройки которых предусмотрен специальный инструмент под названием “Мастер функций”. Алгоритм его использования мы и разберем в данной статье.

Шаг 1: вызов Мастера функций

Для начала выбираем ячейку, в которую планируется вставить функцию.

Затем у нас есть несколько способов открытия Мастера функций:

1. Первый способ, пожалуй, пользуется наибольшей популярностью. Независимо от того, в какой вкладке программы мы находимся, слева от строки формул есть значок “fx (Вставить функцию)”. Именно по нему и следует щелкнуть.
2. Также мы можем переключиться во вкладку “Формулы”, в которой представлена аналогичная кнопка в левом углу ленты программы (группа “Библиотека функций”).
3. Все в той же вкладке и группе (“Формулы” – “Библиотека функций”) представлены категории функций. Кликаем по требуемому варианту и в раскрывшемся перечне можем выбрать нужный оператор. Но т.к. нам нужен именно Мастер функций, то кликаем по пункту “Вставить функцию” в самом конце списка.
4. И напоследок, можно воспользоваться комбинацией Shift+F3, хотя не все пользователи готовы запоминать горячие клавиши для работы в Excel.

Шаг 2: выбор функции

Итак, независимо от того, какой из описанных выше способов был выбран, перед нами появится окно Мастера функций (Вставка функции). Оно состоит из следующих элементов:

1. В самом верху расположено поле для поиска конкретной функции. Все что мы делаем – это набираем название (например, “сумм”) и жмем “Найти”. Результаты отобразятся в поле под надписью “Выберите функцию”.
2. Параметр “Категория”. Щелкаем по текущему значению и в раскрывшемся списке выбираем категорию, к которой относится наша функция (допустим, “Математические”).Всего предлагается 15 вариантов:
3. После того, как категория задана, остается только определиться с функцией в поле “Выберите функцию” (выбираем ее с помощью щелчка левой кнопкой мыши). Когда все готово, жмем кнопку OK (или Enter).

Шаг 3: заполнение аргументов функции

В следующем окне предстоит заполнить аргументы (один или несколько), перечень и тип которых зависит от выбранной функции.

Рассмотрим на примере “СРЗНАЧ” (для вычисления среднего арифметического значения), работающего с числовыми данными.

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

Либо можно указать ссылку на ячейку или диапазон ячеек, содержащих числа.

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

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

Примечания:

• В нижней части окна представлено описание функции, а также комментарии/рекомендации касательно того, как именно следует заполнить тот или иной аргумент.
• Иногда количество аргументов может увеличиться. Например, как это произошло в нашем случае с функцией “СРЗНАЧ”. По умолчанию предусмотрено всего два аргумента, но если мы перейдем к заполнению второго, добавится третий и т.д.
• Принцип заполнения текстовых данных в других функциях, где это предполагается, аналогичен рассмотренному выше – либо мы указываем конкретные значения, либо ссылки на ячейки или диапазоны ячеек.

Шаг 4: выполнение функции

Как только все аргументы заполнены, жмем OK.

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

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

Заключение

Таким образом, Мастер функций позволяет максимально упростить работу с функциями, что делает его одним из самых незаменимых инструментов в Excel. Благодаря нему не нужно запоминать сложные формулы и правила их написания, т.к. все предельно просто реализовано через заполнение специальных полей.

Помогла ли Вам статья?

Процедуры «Function» и «Sub» в VBA

Встроенные функции VBA

​Смотрите также​Параметры​ и запустил выполнение​ на языке VBA)​Функции работы с объектами​Функции обработки строк​ * 100, а​If x>0 Then Cells(1,​Do While x1 <​

​ иконку рядом с​Для многомерных массивов​True​

• ​равно​Перевел: Антон Андронов​, доступную из рабочего​ при помощи простого​​ByRef​​Перед тем, как приступить​​(Options)​​ тех же действий​
• ​ хранятся в программных​GetObject​UCase​​ в сумме —​​ 1).Value = 1​
• ​ x2 (цикл будет​ иконкой Excel;​ в качестве необязательного​, если заданное значение​True​Автор: Антон Андронов​ листа:​​ присваивания этой процедуры​​в объявлении процедуры​ к созданию собственных​

​позволяет посмотреть и​ еще раз. Естественно​ модулях. В любой​Функции работы с объектами​Функции обработки строк​ (F – P).​

Пользовательские процедуры «Function» и «Sub» в VBA

​If x=0 Then Cells(1,​ выполняться пока верно​выбирают команду Mudule;​ аргумента может быть​​ является датой, или​​.​​При написании кода VBA​​Нажмите​ переменной. В следующем​​ можно задать, каким​​ функций VBA, полезно​​ отредактировать сочетание клавиш​​ у такого способа​ книге Excel мы​​IsObject​​Val​​Результаты этих вычислений можно​​ 1).Value = 0​

​ выражение x1 <​сохраняют, нажав на иконку​ указано, индекс какого​False​В приведённой выше таблице​ в Excel набор​​Alt+F8​​ примере показано обращение​ именно способом аргумент​ знать, что Excel​ для быстрого запуска​ есть свои плюсы​ можем создать любое​​Функции работы с объектами​​Функции обработки строк​

Аргументы

​ лучше всего сразу​If x​ x2)​ с изображением floppy​ именно измерения нужо​– если датой​​ перечислены не все​​ встроенных операторов используют​(нажмите клавишу​ к процедуре​ передаётся процедуре. Ниже​ VBA располагает обширной​ макроса.​ и минусы:​ количество программных модулей​

​DDB​CBool​ внести в соответствующие​

​End Sub.​y=x1 + x1^2 +​ disk;​​ возвратить. Если не​​ не является.​​ логические операторы, доступные​​ на каждом шагу.​Alt​SumMinus​ это показано на​

Необязательные аргументы

​ коллекцией готовых встроенных​Кнопка​Макрорекордер записывает только те​ и разместить там​Финансовые функции​Функции преобразования типа данных​ ячейки таблицы «Эксель».​Остается запустить макрос и​ 3*x1^3 – Cos(x1)​

​пишут, скажем так, набросок​ указано, то по​Пример:​ в VBA. Полный​ Эти операторы делятся​

​и, удерживая её​, которая была определена​ примерах:​

​ функций, которые можно​Изменить​​ действия, которые выполняются​​ наши макросы. Один​FV​

​CByte​Для итогов по факту​ получить в «Эксель»​Cells(i, 1).Value = x1​ кода.​

Передача аргументов по значению и по ссылке

​ умолчанию равно 1.​IsDate(«01/01/2015»)​ список логических операторов​

• ​ на математические, строковые,​​ нажатой, нажмите клавишу​ выше.​Sub AddToCells(ByVal i As​ использовать при написании​(Edit)​ в пределах окна​ модуль может содержать​Финансовые функции​Функции преобразования типа данных​ и прогнозу получают​ нужное значение для​
• ​ (значение x1 записывается​​Он выглядит следующим образом:​Year​возвращает​ можно найти на​ операторы сравнения и​F8​Sub main() Dim​ Integer) … End​ кода.​открывает редактор Visual​

​ Microsoft Excel. Как​​ любое количество макросов.​​IPmt​​CCur​​ по формулам ItogP=ItogP​ аргумента.​ в ячейку с​Sub program ()​Возвращает целое число, соответствующее​True​

​Cells(i, 2).Value = y​End Sub​ дате.Пример:​IsDate(100)​В VBA доступно множество​ группу операторов.​​ выберите тот, который​​ 4, 3) End​​ аргумент​​ VBA:​ и отредактировать текст​

​ в другую программу​ помощью окна Project​​Финансовые функции​​Функции преобразования типа данных​​Для отклонений используют =​​ самом известном табличном​ (значение y записывается​Обратите внимание, что строка​Year(«29/01/2015»)​возвращает​ встроенных функций, которые​Основные математические операторы VBA​​ хотите запустить.​​ Sub​​i​​Откройте рабочую книгу Excel​ макроса на VBA.​

VBA процедура «Function»

​ — запись останавливается.​​ Explorer в левом​​MIRR​CDbl​ (ItogF – ItogP)​ процессоре Microsoft не​

​ в ячейку с​ «’Наш код» будет​

​возвращает значение 2015.​​False​​ могут быть использованы​ перечислены в таблице​​Нажмите​​VBA процедуру​передан по значению.​ и запустите редактор​

• ​Чтобы не запоминать сочетание​Макрорекордер может записать только​ верхнем углу редактора​​Финансовые функции​​Функции преобразования типа данных​
• ​ / ItogP *​ так уж сложно.​ координатами (i,2))​ выделена другим цветом​​Данный список включает в​​.​ при написании кода.​ ниже.​Выполнить​Function​​ После выхода из​​ VBA (нажмите для​

​ клавиш для запуска​ те действия, для​

Пример VBA процедуры «Function»: Выполняем математическую операцию с 3 числами

​ (если его не​NPer​​CDec​​ 100, если расчет​ Особенно, если научиться​​i = i +​​ (зеленым). Причина в​ себя только избранные​IsError​ Ниже перечислены некоторые​В правом столбце таблицы​​(Run)​​можно вызвать из​ процедуры​ этого​

​ макроса, лучше создать​ которых есть команды​ видно, нажмите CTRL+R).​Финансовые функции​Функции преобразования типа данных​ ведется в процентах,​ применять функции VBA.​

​ 1 (действует счетчик);​ апострофе, поставленном в​​ наиболее часто употребляемые​​Возвращает​ из наиболее часто​ указан приоритет операторов,​Чтобы выполнять процедуру​ рабочего листа Excel​Sub​​Alt+F11​​ кнопку и назначить​ меню или кнопки​​ Программные модули бывают​​NPV​CInt​ а в случае​ Всего в этом​​x1 = x1 +​​ начале строки, который​ встроенные функции Excel​True​

Вызов VBA процедуры «Function»

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

Вызов VBA процедуры «Function» из другой процедуры

​ суммарной величины —​​ языке программирования, созданном​​ shag (аргумент изменяется​ обозначает, что далее​ Visual Basic. Исчерпывающий​, если заданное значение​Функция Действие​ при отсутствии скобок.​быстро и легко,​​ как любую другую​​i​F2​

​ Кнопка может быть​ же может написать​ разных ситуаций:​Pmt​CLgn​

Вызов VBA процедуры «Function» из рабочего листа

​ (ItogF – ItogP).​​ специально для написания​​ на величину шага);​ следует комментарий.​ список функций VBA,​ является ошибкой, или​Abs​ Добавляя в выражение​ можно назначить для​​ встроенную функцию Excel.​​изменения будут утрачены.​​.​​ нескольких типов:​ макрос, который делает​Обычные модули​Финансовые функции​

​Функции преобразования типа данных​

VBA процедура «Sub»

​Результаты опять же сразу​ приложений в «Эксель»​​Loop​​Теперь вы можете написать​ доступных для использования​False​Возвращает абсолютную величину заданного​

​ скобки, можно изменять​ неё комбинацию клавиш.​

VBA процедура «Sub»: Пример 1. Выравнивание по центру и изменение размера шрифта в выделенном диапазоне ячеек

​ Следовательно, созданную в​Sub AddToCells(ByRef i As​​В выпадающем списке в​​Кнопка на панели инструментов​ то, что Excel​- используются в​PPmt​CSgn​ записываются в соответствующие​ и Word, около​End Sub.​ любой код и​

​ в макросах Excel,​– если ошибкой​ числа.​ порядок выполнения операторов​ Для этого:​ предыдущем примере процедуру​

​ Integer) … End​​ верхней левой части​​ в Excel 2003​ никогда не умел​

​ большинстве случаев, когда​Финансовые функции​Функции преобразования типа данных​​ ячейки, поэтому нет​​ 160 функций. Их​​В результате запуска данного​​ создать для себя​​ можно найти на​​ не является.​Пример:​ VBA по своему​Нажмите​​Function​​ Sub​​ экрана выберите библиотеку​​ и старше​ (сортировку по цвету,​ речь идет о​PV​

VBA процедура «Sub»: Пример 2. Выравнивание по центру и применение полужирного начертания к шрифту в выделенном диапазоне ячеек

​CStr​ необходимости их присваивания​ можно разделить на​ макроса в «Эксель»​ новый инструмент в​ сайте Visual Basic​IsMissing​Abs(-20)​​ желанию.​​Alt+F8​–​

​В этом случае целочисленный​VBA​Откройте меню​ например или что-то​ макросах. Для создания​

Вызов процедуры «Sub» в Excel VBA

Вызов VBA процедуры «Sub» из другой процедуры

​Финансовые функции​​Функции преобразования типа данных​​ переменным.​ несколько больших групп.​ получаем два столбца,​​ VBA Excel (примеры​​ Developer Center.​​В качестве аргумента функции​​возвращает значение 20;​Оператор Действие Приоритет​.​SumMinus​

​ аргумент​.​

​Сервис — Настройка​​ подобное).​​ такого модуля выберите​Rate​CVar​Перед запуском созданной программы,​

​ Это:​ в первом из​ программ см. далее).​

Вызов VBA процедуры «Sub» из рабочего листа

​Урок подготовлен для Вас​​ передаётся имя необязательного​​Abs(20)​(1 — высший;​В появившемся списке макросов​можно вызвать, введя​i​Появится список встроенных классов​​(Tools — Customize)​​Если во время записи​​ в меню​​Финансовые функции​Функции преобразования типа данных​​ требуется сохранить рабочую​​Математические функции. Применив их​ которых записаны значения​​ Конечно, тем, кто​​ командой сайта office-guru.ru​ аргумента процедуры.​возвращает значение 20.​ 5 — низший)​ выберите тот, которому​ в ячейку рабочего​​передан по ссылке.​​ и функций VBA.​и перейдите на​ макроса макрорекордером вы​​Insert — Module​​SLN​CVDate​ книгу, например, под​ к аргументу, получают​​ для x, а​​ знаком с азами​Источник: http://www.excelfunctions.net/VBA-Operators-And-Functions.html​IsMissing​

​Chr​^​​ хотите назначить сочетание​​ листа вот такое​ После выхода из​

• ​ Кликните мышью по​​ вкладку​​ ошиблись — ошибка​​. В появившееся окно​​Финансовые функции​Функции преобразования типа данных​​ названием «Отчет1.xls».​​ значение косинуса, натурального​
• ​ во втором —​ Visual Basic, будет​Перевел: Антон Андронов​
• ​возвращает​​Возвращает символ ANSI, соответствующий​​Оператор возведения в степень​

​ клавиш.​​ выражение:​​ процедуры​ имени функции, чтобы​Команды (Commands)​ будет записана. Однако​

• ​ нового пустого модуля​​SYD​​Choose​
• ​Клавишу «Создать отчетную таблицу»​ логарифма, целой части​ для y.​ намного проще. Однако​
• ​Автор: Антон Андронов​​True​​ числовому значению параметра.​1​Нажмите​
• ​=SumMinus(10, 5, 2)​​Sub​​ внизу окна отобразилось​. В категории​​ смело можете давить​​ можно вводить команды​

​Финансовые функции​​Функции загрузки данных​ требуется нажать всего​ и пр.​Затем по ним строится​ даже те, кто​​Немногие знают, что первая​​, если для рассматриваемого​Пример:​*​Параметры​Редактор VBA понимает, что​все сделанные с​ её краткое описание.​

Область действия процедуры VBA

​Макросы​ на кнопку отмены​ на VBA, набирая​Format​IIf​​ 1 раз после​​Финансовые функции. Благодаря их​​ график способом, стандартным​​ их не имеет,​ версия популярного продукта​ аргумента процедуры не​Chr(10)​

​ или копируя их​FormatCurrency​InputBox​​ Следует знать и​​ программирование в Excel,​​Для реализации циклов в​​ освоиться достаточно быстро.​ в 1985 году.​IsNumeric​Chr(97)​​/​​ введите сочетание клавиш.​, когда встречает группу​ в переменной, которая​откроет страницу онлайн-справки​Настраиваемую кнопку​ записи макроса макрорекордером​ из другого модуля,​​Функции форматирования​​Функции загрузки данных​

Ранний выход из VBA процедур «Function» и «Sub»

​ другие правила. В​ можно получать эффективные​​ VBA Excel 2010,​​За таким названием скрываются​​ С тех пор​​Возвращает​возвращает символ​Оператор деления​Нажмите​​ команд, заключённую между​​ была передана процедуре​​ по этой функции.​​(Custom button)​ она не просто​ с этого сайта​​FormatDateTime​​LoadPicture​ частности, кнопка «Добавить​ инструменты для ведения​ как и в​ программы, написанные на​ он пережил несколько​True​a​2​ОК​ вот такими открывающим​Sub​Кроме того, полный список​

​:​ возрвращает Вас в​ или еще откуда​Функции форматирования​

​Функции загрузки данных​ строку» должна нажиматься​ бухгалтерского учета и​​ других версиях, наряду​​ языке Visual Basic​​ модификаций и востребован​​, если заданное значение​.​​​​и закройте диалоговое​ и закрывающим операторами:​.​

​ встроенных функций VBA​Перетащите ее к себе​
​ предыдущее состояние, но​
​ нибудь:​

​FormatNumber​

office-guru.ru

Операторы и встроенные функции VBA

Операторы Excel VBA

​LoadResData​ каждый раз после​ осуществления финансовых расчетов.​ с уже приведенной​ for Application. Таким​ у миллионов пользователей​ может быть рассмотрено​Date​Оператор деления без остатка​ окно​

Математические операторы

​Sub … End​Помните, что аргументы в​ с примерами можно​

​ на панель инструментов​ и стирает последнюю​Модуль Эта книга​Функции форматирования​Функции загрузки данных​ ввода в таблицу​Функции обработки массивов. К​ конструкцией Do While​ образом, программирование в​

​ по всему миру.​
​ как число, в​Возвращает текущую системную дату.​

Строковые операторы

​ без остатка. Например,​Внимание:​ процедуры​​ Иначе говоря, если​​ Centre.​

​ кнопкой мыши. В​

Операторы сравнения

​ нужным кодом. Благодаря​ малой толикой возможностей​.​ к заданной дате.​74​​Назначая сочетание клавиш​​Sub​ не использованы ключевые​В Excel Visual Basic​ контекстом меню можно​

​в Excel 2003 и​

Логические операторы

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

​StrPtr​

​ вот такой:​число​Оператор модуля (остатка) –​Ctrl+C​ по центру (и​, то аргумент будет​(Функция) или​ доступа в Excel​

Встроенные функции

​(Tools — Macro -​ выполнятся при наступлении​Всем нам приходится -​Dir​ решать задачи для​ числом пробелов, равных​ коротко, без использования​

​ создавать модули для​

​. Если аргумент​Редактор VBA распознаёт процедуру​Function​ в правую половину​ не содержать пробелов​ ячейках, пересчет листа,​ перекладывая монотонную однообразную​Функции работы с файлами​ нажатием дежурных клавиш​ Так, функция WeekdayName​ например, всех нечетных​

​ «Макрос1», а в​Недостатком программы являются проблемы,​
​Возвращает количество символов в​
​год​

​Оператор Действие​

office-guru.ru

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

​Public Sub AddToCells(i As​iFontSize​Function​, а для того,​ окна, т.е. на​ и знаков препинания.​ копирование или удаление​ работу на плечи​Seek​ или через вкладку​ возвращает название (полное​ чисел из диапазона​ поле «Сочетание клавиш»​ связанные с совместимостью​ строке.​q​&​ Integer) … End​

Что такое VBA

​не передан процедуре​, когда встречает группу​ чтобы просто выполнить​ панель быстрого доступа:​Сочетание клавиш​ листа и т.д.)​ Excel. Другим поводом​

​Функции работы с файлами​ «Вид» и пиктограмму​ или частичное) дня​ от 1 до​ вставляют, например, hh​ различных версий. Они​Пример:​квартал​Оператор конкатенации. К примеру,​ Sub​Sub​

​ команд, заключённую между​ какие-то действия (например,​Кнопка на листе​- будет потом​Обычный макрос, введенный в​ для использования макросов​CallByName​ «Макросы».​ недели по его​ 11, то пишем:​ (это значит, что​ обусловлены тем, что​Len(«абвгдеж»)​m​ выражение​Если перед объявлением процедуры​, то его значение​ вот такими открывающим​ изменить форматирование группы​Этот способ подходит для​ использоваться для быстрого​ стандартный модуль выглядит​

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

​ в вашей работе​Функции обработки системных параметров​Автор: Наира​ номеру. Еще более​For i = 1​ запустить программку можно​ код программы VBA​возвращает число 7.​месяц​«A» & «B»​ стоит ключевое слово​ по умолчанию принимается​ и закрывающим операторами:​

​ ячеек), нужно выбрать​ любой версии Excel.​ запуска макроса. Если​ примерно так:​ может стать необходимость​Command​Функция Категория​ полезной является Timer.​ to 10 step​ будет блиц-командой «Ctrl+h»).​

​ обращается к функциональным​Month​y​возвратит результат​Public​ равным 10. Однако​Function … End​ процедуру​

​ Мы добавим кнопку​ забудете сочетание или​Давайте разберем приведенный выше​ добавить в Microsoft​Функции обработки системных параметров​Abs​

​ Он выдает число​ 1 Next.​ Нажимают Enter.​ возможностям, которые присутствуют​Возвращает целое число, соответствующее​день года​AB​, то данная процедура​ же, если аргумент​ Function​Sub​ запуска макроса прямо​ вообще его не​ в качестве примера​ Excel недостающие, но​

​CVErr​Математические функции​ секунд, которые прошли​Здесь step — шаг.​

Как начать

​Теперь, когда уже запущена​ в новой версии​ месяцу в заданной​d​.​ будет доступна для​

​iFontSize​Как упоминалось ранее, процедура​.​ на рабочий лист,​ введете, то макрос​

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

​ всех модулей в​

​ передается процедуре​

​Function​

​При помощи аргументов процедурам​

​ как графический объект.​ можно будет запустить​Zamena​ Например функцию сборки​DoEvents​Математические функции​ конкретного момента дня.​ он равен двум.​

​ копирование содержимого какой-либо​ в старой. Также​Пример:​w​ сравнения двух чисел​ данном проекте VBA.​Sub​в VBA (в​ VBA могут быть​ Для этого:​ через меню​:​ данных с разных​Функции обработки системных параметров​

Макросы в Excel

​Cos​Функции для преобразования числового​ По умолчанию отсутствие​ ячейки в другую.​ к минусам относят​Month(«29/01/2015»)​день недели​ или строк и​Private Sub AddToCells(i As​, то в выделенном​ отличие от​ переданы различные данные.​В Excel 2003 и​Сервис — Макрос -​Любой макрос должен начинаться​ листов на один​Environ​Математические функции​ аргумента в разные​ этого слова в​

Пример 1

​ Возвращаются на исходную​ и чрезмерно высокую​возвращает значение 1.​ww​ возвращают логическое значение​

​ Integer) … End​

• ​ диапазоне ячеек будет​
• ​Sub​
• ​ Список аргументов указывается​
• ​ старше — откройте​

​ Макросы — Выполнить​ с оператора​ итоговый лист, разнесения​Функции обработки системных параметров​Exp​ системы счисления. Например,​ цикле означает, что​ пиктограмму. Нажимают на​ открытость кода для​

​Mid​неделя​ типа​ Sub​ установлен размер шрифта,​), возвращает значение. Для​ при объявлении процедуры.​ панель инструментов​(Tools — Macro -​

​Sub​

• ​ данных обратно, вывод​Erl​
• ​Математические функции​ Oct выдает в​
• ​ шаг единичный.​ «Запись макроса». Это​ изменения посторонним лицом.​

​Возвращает заданное количество символов​h​Boolean​Если перед объявлением процедуры​

​ заданный пользователем.​ возвращаемых значений действуют​ К примеру, процедура​Формы​ Macros — Run)​, за которым идет​ суммы прописью и​Функции обработки системных параметров​Fix​ восьмеричное представление числа.​Полученные результаты нужно сохранять​ действие означает завершение​

​ Тем не менее​ из середины переданной​час​(True или False).​ стоит ключевое слово​Следующая процедура похожа на​ следующие правила:​Sub​через меню​или с помощью​ имя макроса и​ т.д.​

​Error​Математические функции​Функции форматирования. Важнейшей из​ в ячейки с​ программки.​ Microsoft Office, а​ строки. Синтаксис функции:​

Пример 2

​n​ Основные операторы сравнения​Private​

​ только что рассмотренную,​Тип данных возвращаемого значения​в VBA добавляет​Вид — Панели инструментов​ кнопки​ список аргументов (входных​Макрос​Функции обработки системных параметров​Int​ них является Format.​

​ номером (i,1). Тогда​Далее:​ также IBM Lotus​Mid(​минута​ Excel VBA перечислены​, то данная процедура​ но на этот​ должен быть объявлен​

​ заданное целое число​ — Формы (View​Макросы (Macros)​ значений) в скобках.​- это запрограммированная​GetAllSettings​Математические функции​

​ Она возвращает значение​

​ при каждом запуске​

​вновь переходят на строку​

​ Symphony позволяют пользователю​

​строка​

​s​ в этой таблице:​ будет доступна только​ раз, вместо изменения​ в заголовке процедуры​

​ (Integer) в каждую​ — Toolbars -​

​на вкладке​ Если аргументов нет,​ последовательность действий (программа,​Функции обработки системных параметров​

​IsNumeric​ типа Variant с​ цикла с увеличением​ «Макросы»;​

​ применять шифрование начального​,​

​секунда​Оператор Действие​ для текущего модуля.​

​ размера, применяется полужирное​

​Function​

​ ячейку в выделенном​ Forms)​Разработчик (Developer)​ то скобки надо​ процедура), записанная на​GetSetting​Математические функции​ выражением, отформатированным согласно​

​ i на величину​в списке выбирают «Макрос​ кода и установку​

Пример 3

​начало​Пример:​=​ Её нельзя будет​ начертание шрифта в​.​ диапазоне. Передать процедуре​

​В Excel 2007 и​или нажав ALT+F8.​ оставить пустыми.​ языке программирования Visual​Функции обработки системных параметров​Log​ инструкциям, которые заданы​ шага автоматически будет​ 1»;​

​ пароля для его​,​DateAdd(«d», 32, «01/01/2015»)​Равно​ вызвать, находясь в​ выделенном диапазоне ячеек.​Переменная, которая содержит возвращаемое​ это число можно​

​ новее — откройте​Сохранить в…​

​Любой макрос должен заканчиваться​ Basic for Applications​IMEStatus​Математические функции​ в описании формата.​

​ расти и номер​нажимают «Выполнить» (то же​ просмотра.​длина​добавляет 32 дня​<>​

​ любом другом модуле​ Это пример процедуры​ значение, должна быть​

​ при помощи аргумента,​ выпадающий список​- здесь задается​ оператором​ (VBA). Мы можем​Функции обработки системных параметров​Rnd​

​и пр.​ у строки. Таким​ действие запускается начатием​Именно с этими понятиями​)​ к дате 01/01/2015​Не равно​ или из рабочей​Sub​ названа так же,​ вот так:​

​Вставить (Insert)​ место, куда будет​

​End Sub​

​ запускать макрос сколько​IsEmpty​Математические функции​Изучение свойств этих функций​ образом, произойдет оптимизация​ сочетания клавиш «Ctrl+hh»).​

​ нужно разобраться тем,​где​ и, таким образом,​Меньше​ книги Excel.​

​, которой не передаются​ как и процедура​Sub AddToCells(i As​на вкладке​

​ сохранен текст макроса,​

​.​ угодно раз, заставляя​Функции обработки системных параметров​Round​ и их применение​ кода.​В результате происходит действие,​ кто собирается работать​строка​ возвращает дату 02/02/2015.​>​

Пример 4

​Помните о том, что​ никакие аргументы:​Function​ Integer) … End​Разработчик (Developer)​ т.е. набор команд​Все, что находится между​ Excel выполнять последовательность​IsError​Математические функции​ позволит значительно расширить​В целом код будет​ которое было осуществлено​ в среде VBA.​– это исходная​DateAdd(«ww», 36, «01/01/2015»)​Больше​

​ если перед объявлением​Sub Format_Centered_And_Bold() Selection.HorizontalAlignment​. Эту переменную не​ Sub​ ​ на VBA из​

​Sub​

​ любых нужных нам​

​Функции обработки системных параметров​

​Sgn​ сферу применения «Эксель».​ выглядеть, как:​ в процессе записи​ Прежде всего необходимо​ строка,​

​добавляет 36 недель​

​Меньше либо равно​ VBA процедуры​ = xlCenter Selection.VerticalAlignment​ нужно объявлять отдельно,​Имейте в виду, что​

​Выберите объект​ которых и состоит​

​и​ действий, которые нам​

​IsMissing​

​Математические функции​

​Попробуем перейти к решению​Sub program()​ макроса.​ понять, что такое​

Функции VBA

​начало​ к дате 01/01/2015​>=​Function​ = xlCenter Selection.Font.Bold​ так как она​ наличие аргументов для​Кнопка (Button):​ макрос.:​End Sub​ не хочется выполнять​Функции обработки системных параметров​Sin​ более сложных задач.​For i = 1​Имеет смысл увидеть, как​

• ​ объект. В Excel​– позиция начала​ и возвращает дату​Больше либо равно​или​
• ​ = True End​ всегда существует как​ процедур​Затем нарисуйте кнопку на​Эта книга​- тело макроса,​ вручную.​
• ​IsNull​Математические функции​ Например:​
• ​ To 10 Step​ выглядит код. Для​ в этом качестве​ извлекаемой строки,​ 09/09/2015.​Логические операторы, как и​Sub​ Sub​ неотъемлемая часть процедуры​Function​ листе, удерживая левую​- макрос сохраняется​ т.е. команды, которые​В принципе, существует великое​Функции обработки системных параметров​Sqr​Дан бумажный документ отчета​
• ​ 1 (можно записать​ этого вновь переходят​ выступают лист, книга,​длина​DateDiff​
• ​ операторы сравнения, возвращают​ключевое слово не​Чтобы вызвать VBA процедуру​Function​и​ кнопку мыши. Автоматически​ в модуль текущей​ будут выполняться при​ множество языков программирования​Shell​Математические функции​ фактического уровня издержек​ просто For i​
• ​ на строку «Макросы»​ ячейка и диапазон.​– количество символов,​Вычисляет количество определённых временных​ логическое значение типа​
• ​ вставлено, то по​Sub​.​Sub​ появится окно, где​ книги и, как​ запуске макроса. В​
• ​ (Pascal, Fortran, C++,​

​Функции обработки системных параметров​Tan​ предприятия. Требуется:​ = 1 To​

Пример 5

​ и нажимают «Изменить»​ Данные объекты обладают​ которые требуется извлечь.​

​ интервалов между двумя​Boolean​ умолчанию для процедуры​

• ​из другой VBA​Это отлично проиллюстрировано в​в VBA не​
• ​ нужно выбрать макрос,​ следствие, будет выполнятся​ данном случае макрос​ C#, Java, ASP,​Switch​Математические функции​разработать его шаблонную часть​

​ 10)​ или «Войти». В​

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

​ специальной иерархией, т.е.​Пример:​ заданными датами.​(True или False).​ устанавливается свойство​ процедуры, нужно записать​ следующем примере.​ является обязательным. Для​ который должен запускаться​ только пока эта​ выделяет ячейку заливает​ PHP…), но для​Функции обработки системных параметров​Array​ посредством табличного процессора​Cells(i, 1).Value = i​ результате оказываются в​ подчиняются друг другу.​

Переменные

​Mid(«абвгдежзиклмн», 4, 5)​Пример:​ Основные логические операторы​Public​ ключевое слово​

• ​Ниже приведён пример кода​ некоторых процедур аргументы​
• ​ при щелчке по​ книга открыта в​ выделенных диапазон (Selection)​
• ​ всех программ пакета​QBColor​Функции обработки массивов​
• ​ «Эксель»;​ ^ 2 (т.е.​ среде VBA. Собственно,​

​Главным из них является​возвращает строку «гдежз»;​DateDiff(«d», «01/01/2015», «02/02/2015»)​ Excel VBA перечислены​(то есть она​Call​ VBA процедуры​ не нужны.​

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

​ нарисованной кнопке.​ Excel​ желтым цветом (код​ Microsoft Office стандартом​Функции обработки цвета​IsArray​составить программу VBA, которая​ в ячейку (i,1)​ сам код макроса​

​ Application, соответствующий самой​Mid(«абвгдежзиклмн», 10, 2)​вычисляет количество дней​ в таблице ниже:​

​ будет доступна везде​, имя процедуры​Function​Процедуры VBA могут иметь​Создание пользовательских функций или,​

​Новая книга​ = 6) и​ является именно встроенный​RGB​Функции обработки массивов​ будет запрашивать исходные​ записывается значение квадрата​ находится между строками​

​ программе Excel. Затем​возвращает строку «кл».​ между датами 01/01/2015​Оператор Действие​ в данном проекте​

​Sub​, которая получает три​ необязательные аргументы. Это​ как их иногда​

​- макрос сохраняется​ затем проходит в​ язык VBA. Команды​Функции обработки цвета​LBound​ данные для ее​ i)​ Sub Макрос1() и​ следуют Workbooks, Worksheets,​Minute​ и 02/02/2015, возвращает​And​ VBA). В этом​и далее в​ аргумента типа​ такие аргументы, которые​ еще называют, UDF-функций​

​ в шаблон, на​ цикле по всем​ этого языка понимает​Date​Функции обработки массивов​ заполнения, осуществлять необходимые​Next (в некотором смысле​ End Sub.​ а также Range.​Возвращает целое число, соответствующее​ результат 32.​Операция конъюнкции, логический оператор​ состоит отличие от​ скобках аргументы процедуры.​Double​ пользователь может указать,​ (User Defined Functions)​ основе которого создается​ ячейкам, заменяя формулы​ любое офисное приложение,​Функции работы с датами​UBound​ расчеты и заполнять​ играет роль счетчика​

​Если копирование было выполнено,​

fb.ru

Список всех функций

​ Например, для обращения​

excelworld.ru

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

Введение

​ ячейку листа Excel,​ процедура​ равен 0.​ для расчета, например,​загружаются в память​ отчета для руководства​ Visual Basic Editor)​Функции работы с датами​Len​ итогам и ФИО​ или иное решение​ С1.​ или Formula.​– это исходная​возвращает число 22.​. Например, выражение​ примере простой процедуры​ как это может​Function​Необязательных аргументов в процедуре​ налога на добавленную​ при старте Excel​ компании. Поэтому мы​.​Month​Функции обработки строк​ специалиста заранее не​ в зависимости от​Циклы VBA помогают создавать​Методы — это команды,​ строка, а​InStr​A Or B​Function​ быть сделано с​

​иллюстрирует, как данные​​ может быть несколько,​ стоимость (НДС) откроем​ и могут быть​ переходим ко второму​В новых версиях (Excel​Функции работы с датами​LTrim​ резервируют. Рабочему листу​ какого-то условия. Не​ различные макросы в​ показывающие, что требуется​длина​Принимает в качестве аргументов​

​возвратит​, в которой ожидается​ процедурой​ передаются процедуре через​ все они перечисляются​ редактор VBA, добавим​ запущены в любой​ способу создания макросов,​ 2007 и новее)​MonthName​Функции обработки строк​ присваивается новое название.​ обойтись без них​ Excel.​

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

​ сделать. При написании​– это количество​ целое число и​True​ получение положительного аргумента​Function​ аргументы. Можно увидеть,​

• ​ в конце списка​ новый модуль через​ момент и в​ а именно…​​ для этого нужно​Функции работы с датами​ ​Mid​ Например, «Օтчет».​​ и в VBA​
• ​Циклы VBA помогают создавать​ кода в VBA​ символов, которые надо​ две строки. Возвращает​​, если​​ для выполнения дальнейших​​, потому что процедура​ что тип данных,​ аргументов.​ меню​​ любой книге.​Макрорекордер​ сначала отобразить вкладку​​Now​​Функции обработки строк​Для написания программы автоматического​ Excel. Примеры программ,​ различные макросы. Предположим,​ их необходимо отделять​ извлечь, считая от​ позицию вхождения второй​​A​ ​ операций. Если процедуре​
  
  ​Sub​

​ возвращаемых процедурой, определён​Аргументы в VBA могут​Insert — Module​После включения записи и​- это небольшая​Разработчик (Developer)​Функции работы с датами​Partition​

​ заполнения шаблона, необходимо​ где дальнейший ход​ что имеется функция​ от объекта точкой.​ конца заданной строки.​ строки внутри первой,​или​ передано не положительное​не возвращает значение.​ как​ быть переданы процедуре​и введем туда​ выполнения действий, которые​ программа, встроенная в​. Выбираем​Second​Функции обработки строк​ выбрать обозначения. Они​ выполнения алгоритма выбирается,​ y=x + x2​ Например, как будет​

• ​Пример:​​ начиная поиск с​B​ значение, то дальнейшие​ Однако, процедуры​Double​ двумя способами:​​ текст нашей функции:​​ необходимо записать, запись​ Excel, которая переводит​Файл — Параметры -​Функции работы с датами​Replace​ будут использоваться для​ а не предопределен​ + 3×3 –​ показано в дальнейшем,​Right(«абвгдежзиклмн», 4)​
  
• ​ позиции, заданной целым​​равны​ операции не могут​Sub​(об этом говорят​ByVal​Обратите внимание, что в​ можно остановить командой​ любое действие пользователя​ Настройка ленты (File​Time​Функции обработки строк​ переменных:​ изначально, чаще всего​
  
• ​ cos(x). Требуется создать​​ очень часто при​возвращает строку «клмн»;​ числом.​True​ быть выполнены, поэтому​, не имеющие аргументов​ слова​​– передача аргумента​​ отличие от макросов​Остановить запись​ на язык программирования​ — Options -​Функции работы с датами​Right​NN– номер текущей строки​ используют конструкцию If​
  

​ макрос для получения​ программировании в «Эксель»​Right(«абвгдежзиклмн», 1)​

​Пример:​, и возвратит​ пользователю должно быть​​ и объявленные как​​As Double​

• ​ по значению. Это​ функции имеют заголовок​​(Stop Recording)​​ VBA и записывает​ Customize Ribbon)​Timer​Функции обработки строк​ таблицы;​ …Then (для сложных​ ее графика. Сделать​
• ​ используют команду Cells(1,1).Select.​возвращает строку «н».​​InStr(1, «Вот искомое слово»,​​False​
• ​ показано сообщение об​​Public​​после списка аргументов).​​ значит, что процедуре​​Function​.​ получившуюся команду в​и включаем в​Функции работы с датами​RTrim​TP и TF –​ случаев) If …Then​ это можно только,​ Она означает, что​Second​ «слово»)​, если​ ошибке и процедура​(как будет показано​

​ Также данный пример​ передаётся только значение​вместо​Управление всеми доступными макросами​ программный модуль. Если​ правой части окна​TimeSerial​Функции обработки строк​ планируемый и фактический​ …END If.​ используя циклы VBA.​ необходимо выбрать ячейку​Возвращает целое число, соответствующее​возвращает число 13.​A​ должна быть тут​ далее), будут доступны​ показывает, как результат​ (то есть, копия​

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

​Sub​​ производится в окне,​ мы включим макрорекордер​ флажок​Функции работы с датами​Space​ товарооборот;​Рассмотрим конкретный случай. Предположим,​За начальное и конечное​ с координатами (1,1)​ количеству секунд в​InStr(14, «Вот искомое слово,​и​ же завершена:​ для пользователей рабочего​ процедуры​ аргумента), и, следовательно,​и непустой список​ которое можно открыть​ на запись, а​Разработчик (Developer)​TimeValue​Функции обработки строк​SF и SP –​ необходимо создать макрос​ значение аргумента функции​ т.е. A1.​ заданном времени.​ а вот еще​B​Function VAT_Amount(sVAT_Rate As​ листа. Таким образом,​Function​ любые изменения, сделанные​ аргументов (в нашем​ с помощью кнопки​

• ​ затем начнем создавать​. Теперь на появившейся​Функции работы с датами​Spc​ фактическая и планируемая​ для «Эксель», чтобы​ берут x1=0 и​Вместе с ней нередко​
• ​Пример:​ искомое слово», «слово»)​оба равны​ Single) As Single​ если рассмотренные выше​сохраняется в переменной​ с аргументом внутри​ случае это​Макросы (Macros)​ свой еженедельный отчет,​ вкладке нам будут​Weekday​
• ​Функции обработки строк​ сумма издержек;​ в ячейку с​ x2=10. Кроме того,​ используется Selection.ClearContents. Ее​Second(«22:45:15»)​возвращает число 38.​False​ VAT_Amount = 0​ простые процедуры​ с именем, совпадающим​ процедуры, будут потеряны​Summa​на вкладке​ то макрорекордер начнет​

​ доступны основные инструменты​

• ​Функции работы с датами​Split​IP и IF –​​ координатами (1,1) было​ необходимо ввести константу​ ​ выполнение означает очистку​возвращает значение 15.​
• ​Примечание:​.​ If sVAT_Rate​​Sub​​ с именем процедуры.​​ при выходе из​

​). После ввода кода​Разработчик (Developer)​ записывать команды вслед​​ для работы с​​WeekdayName​

• ​Функции обработки строк​​ планируемый и фактически​ записано:​ — значение для​ содержимого выбранной ячейки.​Sqr​Аргумент-число может быть​Not​
• ​Обратите внимание, что перед​​вставлены в модуль​Если рассмотренная выше простая​ неё.​ наша функция становится​или — в​ за каждым нашим​ макросами, в том​Функции работы с датами​​Str​ уровень издержек.​ ​1, если аргумент положительный;​ шага изменения аргумента​​Прежде всего требуется создать​Возвращает квадратный корень числовой​​ не задан, в​​Операция отрицания, логический оператор​​ тем, как завершить​​ в редакторе Visual​
• ​ процедура​​ByRef​ доступна в обычном​ старых версиях Excel​ действием и, в​ числе и нужная​Year​Функции обработки строк​
• • ​Обозначим теми же буквами,​​0, если аргумент нулевой;​ и начальное значение​ файл и сохранить​ величины, переданной в​ таком случае поиск​НЕ​ выполнение процедуры​
  • ​ Basic, то процедура​​Function​– передача аргумента​ окне Мастера функций​ — через меню​ итоге, мы получим​ нам кнопка​Функции работы с датами​StrComp​ но с «приставкой»​-1, если аргумент отрицательный.​ для счетчика.​
  • ​ его, присвоив имя​​ аргументе.​ начинается с первого​. Например, выражение​​Function​​Format_Centered_And_Bold​вставлена в модуль​ по ссылке. То​​ (​​Сервис — Макрос -​ макрос создающий отчет​Редактор Visual Basic​Hex​Функции обработки строк​ Itog накопление итога​

​Создание такого макроса для​Все примеры макросов VBA​ и выбрав тип​Пример:​​ символа строки, заданной​ ​Not A​​–​

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

​будет доступна для​ в редакторе Visual​ есть процедуре передаётся​Вставка — Функция​​ Макросы​​ как если бы​​(Visual Basic Editor)​​Функции преобразования чисел в​StrConv​ по данному столбцу.​​ «Эксель» начинается стандартным​ Excel создаются по​ ​ «Книга Excel с​Sqr(4)​​ во втором аргументе​

• ​возвратит​VAT_Amount​ использования на рабочем​​ Basic, то она​ ​ фактический адрес размещения​​) в категории​
• ​(Tools — Macro -​​ он был написан​ ​:​​ разные системы счисления​Функции обработки строк​ Например, ItogTP –​ способом, через использование​
• ​ той же процедуре,​​ поддержкой макросов».​ ​возвращает значение 2;​​ функции.​True​, в код вставлена​ листе книги Excel,​ может быть вызвана​

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

​ аргумента в памяти.​Определенные пользователем (User Defined)​ Macros)​ программистом. Такой способ​К сожалению, интерфейс редактора​Oct​String​

​ касается столбца таблицы,​ «горячих» клавиш Alt​ которая представлена выше.​

​Затем необходимо перейти в​​Sqr(16)​ ​Int​​, если​ встроенная VBA функция​​ а процедура​​ из других процедур​​ Любые изменения, сделанные​​:​:​​ создания макросов не​ ​ VBA и файлы​​Функции преобразования чисел в​

​Функции обработки строк​ озаглавленного, как «планируемый​ и F11. Далее​ В данном конкретном​ приложение VB, для​возвращает значение 4.​Возвращает целую часть заданного​A​MsgBox​

​Format_Centered_And_Sized​ VBA или использована​ с аргументом внутри​

​После выбора функции выделяем​Любой выделенный в списке​ требует знаний пользователя​ справки не переводятся​ разные системы счисления​StrReverse​​ товарооборот».​ записывается следующий код:​ случае код выглядит,​​ чего достаточно воспользоваться​

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

​ компанией Microsoft на​

​VarType​Функции обработки строк​Используя введенные обозначения, получаем​Sub program()​ как:​ комбинацией клавиш «Alt»​Возвращает текущее системное время.​

• ​Пример:​False​ всплывающее окно с​​ доступна, так как​​ в книге Excel.​​ при выходе из​ (с суммой, для​ кнопкой​ VBA и позволяет​
• ​ русский язык, поэтому​Функции преобразования чисел в​Tab​​ формулы для отклонений.​​x= Cells(1, 1).Value (эта​​Sub programm()​​ и «F11». Далее:​

​Ubound​​Int(5.79)​

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

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

​ с английскими командами​ разные системы счисления​Функции обработки строк​ Если требуется осуществить​ команда присваивает x​x1 = 1​в строке меню, расположенном​Возвращает верхний индекс измерения​возвращает результат 5.​False​Урок подготовлен для Вас​Вот простой способ запустить​Function​При помощи ключевых слов​ НДС) как в​(Run)​ неким аналогом видеозаписи:​ в меню и​CreateObject​Trim​

​ расчет в %​ значение содержимого ячейки​x2 = 10​ в верхней части​ заданного массива.​Isdate​, если​​ командой сайта office-guru.ru​​ (или выполнить) процедуру​можно вызвать из​

​ByVal​ случае с обычной​.​​ включил запись, выполнил​​ окнах придется смириться:​​Функции работы с объектами​​Функции обработки строк​ имеем (F –​ с координатами (1,​​shag = 0.1​​ окна, нажимают на​Примечание:​Возвращает​A​Источник: http://www.excelfunctions.net/VBA-Functions-And-Subroutines.html​​Sub​​ другой VBA процедуры​​или​​ функцией:​

​Кнопка​ операци, перемотал пленку​Макросы (т.е. наборы команд​GetAutoServerSettings​TypeName​ P) / P​ 1))​

planetaexcel.ru

​i = 1​

Лабораторная
работа № 11

Тема: Использование
функций в Excel

Понятие и типы
функций в Excel

В ячейки Excel
можно вводить формулы, в состав которых
входят встроенные функции.

Под функцией
в Excel понимают не что иное, как встроенные
подпрограммы для организации вычислений
в Excel.

Любая функция
имеет свое неповторимое (уникальное)
имя, один или несколько аргументов. В
общем виде любая функция записывается
следующим образом: =F(arg1,
arg2,…) , где
F – имя функции; arg1, arg2,… —
аргументы функции.

Аргумент
функции –
это значение, с которым оперирует данная
функция и которое надо задать, чтобы
получить результат функции. Аргументами
функции могут быть числа, текст, логические
выражения, ссылки на ячейки или диапазон
ячеек.

В таблице 1 приведены
примеры некоторых функций табличного
процессора Excel.

Таблица 1 – Некоторые
функции табличного процессора Excel

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

Вызвать любую
функцию в Excel можно
несколькими способами:

П
ервый
способ. Прямо набрав после знака равно
имя функции и в скобках список аргументов.

Второй способ.
С помощью кнопки на Стандартной
панели инструментов вызвать Мастер
функций.

Третий способ.
Через меню Вставка→Функция, в
результате чего также вызывается Мастер
функций.

После вызова
Мастера функций необходимо выполнить
следующие действия:

1. в

   поле Категория выбрать категорию
   функции в открывшемся диалоговом окне
   (рисунок 1);

2. в
   поле Функция этого же диалогового
   окна выбрать требуемую функцию;

3. в
   результате откроется диалоговое окно
   данной функции (рисунок 2), в котором
   следует указать аргументы данной
   функции.

Рисунок 1 – Окно
Мастера функций – шаг 1 из 2

1 2 3 4 5

1- имя функции; 2 –
описание функции; 3 – аргумент функции;
4 – описание аргумента функции; 5 –
сворачивающая кнопка

Рисунок 2 – Окно
диалога функции ABS

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

Четвертый способ.
Используя кнопку стандартных формул в
строке формул. Для этого необходимо
выполнить следующее:

1. указать
   ячейку, в которую следует ввести формулу;

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

3. нажать
   кнопку выпадающего списка, расположенную
   справа от кнопки Стандартные функции.
   В результате раскроется список
   стандартных функций (рисунок 3);

4. в
   списке выбрать функцию, вставляемую в
   формулу. Если функция отсутствует в
   списке, для вывода дополнительного
   списка функций следует выбрать в данном
   списке пункт Другие функции;

5. по
   завершении набора формулы нажать
   клавишу ENTER.

Рисунок 3– Список
стандартных функций

Функции могут
использоваться как аргументы в других
функциях. Если функция используется в
качестве аргумента или является вложенной
функцией, то она должна возвращать
аргументу значение того же типа. Если
функция возвращает значение другого
типа, отобразится ошибка #ЗНАЧ!.

В
формулах можно использовать до семи
уровней вложения функций. Когда «функция
Б» является аргументом «функции А», то
«функция Б» считается вторым уровнем
вложения. Если в «функции Б» содержится
в качестве аргумента «функция В», то
«функция В» будет считаться третьим
уровнем вложения функций.

Программирование алгоритма табличного представления функции

Пусть задана
функция F(x).
Необходимо протабулировать данную
функцию на отрезке [a,b]
с некоторым шагом h.
Табулированием функции F(x)
назовем процесс, в результате которого
получается ее табличное представление:

Постановка
задачи: Необходимо в табличном
процессоре Excel протабулировать
функцию F(x)=sin²(x-1)+x
на отрезке [0,5] c шагом 0,5.
При этом следует предусмотреть случай
автоматического изменения результата
функции при изменении исходных данных.

Алгоритм
реализации:

1. в
   ячейки А1 и А2 занесем текст x,
   F(x)
   и h;

2. в
   ячейку В1 записать начальное значение
   x — число 0;

3. в
   ячейку С2 записать формулу вычисления
   следующего значения x:

=В1+В3

1. изменить
   с данной формуле тип ссылки на ячейку
   В3, сделав ее абсолютной $B$3,
   для того, чтобы при копировании данной
   формулы на последующие ячейки
   осуществлялся автоматический пересчет
   всех значений х из отрезка. Таким
   образом, окончательно формула в ячейке
   С2 примет вид: =В1+$В$3

2. в
   ячейку В2 занести формулу, вычисляющую
   значение функции F(x)
   в первой точке х: =(SIN(A1-1))^2+A1

3. cкопировать
   эту формулу на остальные ячейки диапазона
   С2:L2.

В
результате таблица примет вид,
представленный на рисунке 4.

Рисунок 4 – Примерный
вид табличного представления функции
в Excel

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]

• #
• #
• #
• #
• #
• #
• #
• #
• #
• #
• #