Перейти к содержимому
Наше приложение «Дешевые авиабилеты» в AppGallery >>

VBA Excel. Первая функция (для начинающих)

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

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

    Вводная информация

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

    В качестве примера мы создадим функцию, вычисляющую объем цилиндра по формуле: V=π*D²/4*H, где

    • V – объем цилиндра;
    • π – число Pi;
    • D – диаметр основания цилиндра;
    • H – высота цилиндра.

    Первая функция на VBA Excel

    Создайте или откройте файл Excel с расширением .xlsm (Книга Excel с поддержкой макросов). В версиях Excel по 2003 год – с расширением .xls.

    Перейдите в редактор VBA, нажав сочетание клавиш «Левая_клавиша_Alt+F11».

    Если вы не создавали ранее в этом проекте VBA стандартный программный модуль, нажмите кнопку «Module» во вкладке «Insert» главного меню. То же подменю откроется при нажатии на вторую кнопку после значка Excel на панели инструментов.

    Ссылка на модуль появится в проводнике слева. Если модуль создан ранее, дважды кликните по его ссылке в проводнике, и он откроется справа для редактирования.

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

    В открывшемся окне добавления шаблона процедуры выберите «Function», вставьте в поле «Name» название функции «ObyemTsilindra» и нажмите «OK».

    Шаблон функции добавится на лист модуля.

    Вставьте в скобки через запятую аргументы функции (D, H), а внутрь шаблона следующую строку:

    В этой строке, функции (слева) присваивается значение, вычисленное в выражении справа. Выражение повторяет нашу первоначальную формулу вычисления объема цилиндра, где «WorksheetFunction.Pi» – это функция рабочего листа, возвращающая число Pi.

    Функция, вычисляющая объем цилиндра по диаметру основания и высоте готова.

    Вставка функции в ячейку

    Вставить пользовательскую функцию в ячейку можно как вручную: =ObyemTsilindra(Ячейка1;Ячейка2), так и с помощью мастера функций.

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

    В открывшемся окне «Вставка функции» выберите категорию «Определенные пользователем», а в открывшемся списке – функцию «ObyemTsilindra» и нажмите «OK».

    В окне «Аргументы функции» в полях аргументов выберите соответствующие ячейки, кликнув по ним на рабочем листе, и нажмите «OK».

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


    Содержание рубрики VBA Excel по тематическим разделам со ссылками на все статьи.

    9 комментариев для “VBA Excel. Первая функция (для начинающих)”

    1. В мастере функций отсутствует категория «Определенные пользователем». Почему?

      1. Уточняю ситуацию с вопросом. Функцию я создал в Листе1. Когда я скопировал ее в модуль, она появилась в списке функций Экселя. Процедуры и функции можно создавать как в модуле, так и непосредственно в книгах. В чем разница?

        1. Евгений

          Добрый день, Борис!
          Функции, записанные в модулях листов и книг, доступны только для использования их в других процедурах. Применение их в качестве формул в ячейках рабочего листа не предусмотрено. При вводе такой формулы вручную будет возвращена ошибка: #ИМЯ?

    2. Здравствуйте.
      А в чем смысл такого сложного вычисления, если можно просто в С2 написать форулу?

      1. Евгений

        Здравствуйте, Анна!
        Смысл этой статьи заключается в том, чтобы на простом примере объяснить, как создавать и применять пользовательские функции. Это знание поможет, в дальнейшем, создавать собственные функции, которые будут заменять очень сложные формулы.

    3. Мубинджон

      Здравствуйте. Мне непонятно одно процедура «Function», откуда возвращает? До этого куда пошла?
      А процедура «Sub» откуда не возвращает?

      1. Евгений

        Добрый день, Мубинджон!
        Функция производит какие-то вычисления и/или другие операции и возвращает их результат в ячейку, в которой она записана.

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

        То есть смысл «возвращения» не в том, что функция куда-то пошла и потом вернулась, а в том, что мы ей дали какие-то аргументы (например, 25 для Sqr), а она нам возвратила результат вычислений и/или других операций. К другим операциям можно отнести работу с текстом.

        Процедура может ничего не возвращать, например:

        Эта процедура копирует активный лист в новую книгу Excel.

    4. Мубинджон

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

      1. Евгений

        Мубинджон, эта функция работает так же, как и любая встроенная функция рабочего листа, например =СУММ().
        Вставьте в любую ячейку формулу =ObyemTsilindra(5;12). Вы сразу увидите результат вычисления. Числа 5 и 12 вы можете заменить на ссылки на ячейки.

    Добавить комментарий

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