Підпрограма Excel VBA: Як зателефонувати до Sub в VBA на прикладі

Зміст:

Anonim

Що таке підпрограма у VBA?

Підпрограма в VBA являє собою фрагмент коду , який виконує завдання конкретної описаної в коді , але не повертає результат або значення. Підпрограми використовуються для розбиття великих фрагментів коду на дрібні керовані частини. Підпрограми можна викликати кілька разів з будь-якої точки програми.

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

У цьому підручнику VBA ви дізнаєтесь-

  • Навіщо використовувати Підпрограми
  • Правила іменування підпрограм і функцій
  • Синтаксис підпрограми VBA
  • Як зателефонувати на Sub в VBA

Навіщо використовувати Підпрограми

  • Розбийте код на невеликий керований код : середня комп'ютерна програма має тисячі і тисячі рядків вихідного коду. Це вносить складність. Підпрограми допомагають вирішити цю проблему, розбиваючи програму на невеликі керовані фрагменти коду.
  • Повторне використання коду . Скажімо, у вас є програма, яка повинна отримати доступ до бази даних, майже всі вікна програми повинні взаємодіяти з базою даних. Замість того, щоб писати окремий код для цих вікон, ви можете створити функцію, яка обробляє всі взаємодії з базою даних. Потім ви можете зателефонувати йому з будь-якого вікна, яке хочете.
  • Підпрограми та функції самодокументуються . Скажімо, у вас є функція CalcuLoanInterest та інша, яка говорить connectToDatabase. Подивившись лише на назву підпрограми / функції, програміст зможе сказати, що робить програма.

Правила іменування підпрограм і функцій

Щоб використовувати підпрограми та функції, існує набір правил, яких потрібно дотримуватися.

  • Підпрограма або ім'я функції виклику VBA не може містити пробілу
  • Підзаголовок виклику Excel VBA або назва функції повинна починатися з літери або підкреслення. Він не може починатися з цифри або спеціального символу
  • Ім'я підпрограми або функції не може бути ключовим словом. Ключове слово - це слово, яке має особливе значення у VBA. Такі слова, як Private, Sub, Function, End та ін., Є прикладами ключових слів. Компілятор використовує їх для конкретних завдань.

Синтаксис підпрограми VBA

Вам потрібно буде ввімкнути вкладку Розробник у Excel, щоб слідувати разом із цим прикладом. Якщо ви не знаєте, як увімкнути вкладку Розробник, прочитайте підручник з операторів VBA

ТУТ у синтаксисі,

Private Sub mySubRoutine(ByVal arg1 As String, ByVal arg2 As String)'do somethingEnd Sub

Пояснення синтаксису

Код

Дія

  • "Приватна підсистема mySubRoutine (…)"
  • Тут ключове слово "Sub" використовується для оголошення підпрограми з назвою "mySubRoutine" і запуску тіла підпрограми.
  • Ключове слово Private використовується для вказівки обсягу підпрограми
  • "ByVal arg1 як рядок, ByVal arg2 як рядок":
  • Він оголошує два параметри рядкового типу даних arg1 та arg2
  • "Кінець суб"
  • "Кінець підпрограми" використовується для завершення тіла підпрограми

Наступна підпрограма приймає ім’я та прізвище та відображає їх у вікні повідомлення.

Тепер ми збираємося запрограмувати та виконати цю підпроцедуру. Подивимось це.

Як зателефонувати на Sub в VBA

Нижче наведено покроковий процес про те, як зателефонувати на Sub в VBA:

  1. Спроектуйте інтерфейс користувача та встановіть властивості для елементів керування користувача.
  2. Додайте підпрограму
  3. Напишіть код події клацання для командної кнопки, яка викликає підпрограму
  4. Перевірте заявку

Крок 1) Інтерфейс користувача

Сконструюйте інтерфейс користувача, як показано на малюнку нижче

Встановіть такі властивості. Властивості, які ми встановлюємо

S / N Контроль Власність Значення
1 CommandButton1 Ім'я btnDisplayFullName
2 Заголовок Підпрограма повного імені

Тепер ваш інтерфейс повинен виглядати наступним чином

Крок 2) Додайте підпрограму

  1. Натисніть Alt + F11, щоб відкрити вікно коду
  2. Додайте наступну підпрограму
Private Sub displayFullName(ByVal firstName As String, ByVal lastName As String)MsgBox firstName & " " & lastNameEnd Sub

ТУТ у коді,

Код

Дії

  • "Private Sub displayFullName (…)"
  • Він оголошує приватну підпрограму displayFullName, яка приймає два параметри рядка.
  • "ByVal firstName як рядок, ByVal lastName як рядок"
  • Він оголошує дві змінні параметра firstName та lastName
  • MsgBox firstName & "" & lastName "
  • Він викликає вбудовану функцію MsgBox для відображення вікна повідомлення. Потім він передає змінні 'firstName' та 'lastName' як параметри.
  • Амперсанд "&" використовується для об'єднання двох змінних та додавання порожнього простору між ними.

Крок 3) Виклик підпрограми з події натискання командної кнопки.

  • Клацніть правою кнопкою миші на командній кнопці, як показано на малюнку нижче. Виберіть Переглянути код.
  • Відкриється редактор коду

Додайте наступний код у редактор коду для події кліку командної кнопки btnDisplayFullName.

Private Sub btnDisplayFullName_Click()displayFullName "John", "Doe"End Sub

Вікно коду тепер має виглядати наступним чином

Збережіть зміни та закрийте вікно коду.

Крок 4) Тестування коду

На панелі інструментів розробника вимкніть режим проектування. Як показано нижче.

Крок 5) Клацніть на командну кнопку "Підпрограма FullName".

Ви отримаєте наступні результати

Завантажте вищезгаданий код Excel

Короткий зміст:

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