Макросы в Excel — мощный инструмент для автоматизации рутинных задач. Однако, чтобы по-настоящему раскрыть их потенциал, нужно уметь не только писать отдельные процедуры, но и грамотно вызывать одну процедуру из другой, а также управлять переменными между ними. Именно об этом и пойдёт речь в статье.
Разберёмся:
- как вызывать процедуры друг из друга;
- какие переменные «живут» дольше остальных;
- когда и зачем использовать Public и Private.
Готовы к практическому погружению? Начинаем!
📌 Что такое вызов процедуры из другой процедуры
Допустим, у вас есть две подпрограммы:
Sub MyExample1()
Dim my As Integer
my = 50
MsgBox my
Call MyDeck
End Sub
Sub MyDeck()
MsgBox "Текст"
MsgBox 123
MsgBox Date
End Sub
🔹 Здесь MyExample1 сначала присваивает переменной my значение 50 и выводит его в MsgBox, затем вызывает другую процедуру MyDeck, используя команду Call.
✅ Важно: Call в VBA можно опустить — достаточно просто указать имя процедуры. Но для читаемости кода особенно на старте — лучше его использовать.
🔄 После выполнения MyDeck, программа возвращается назад и продолжает выполнение оставшихся команд MyExample1, если они есть.
🧠 Что происходит с переменными при вызове других макросов
Представим, что вы хотите использовать значение переменной dbl из MyDeck в другой подпрограмме. Однако вот что произойдёт:
Sub MyDeck()
Dim dbl As Double
dbl = 876.21
End Sub
Sub MyExample1()
MsgBox dbl ' Появится ПУСТОЕ сообщение
End Sub
⚠️ Почему пусто? Потому что переменная dbl была локальной — она «жила» только внутри MyDeck, и после завершения работы этой процедуры память была освобождена.
🔐 Как сделать переменные доступными между процедурами
Вот тут вступают в игру Public и Private переменные. Это переменные, которые объявляются не внутри процедуры, а вне её — в начале модуля. Их основное назначение — обеспечить доступ к данным в разных частях кода.
🟢 Public переменные
Если вы хотите, чтобы переменная была доступна всем процедурам во всех модулях, используйте Public.
Public dbl As Double
📍 Объявляется в начале любого модуля, но вне процедур.
Пример использования:
Public dbl As Double
Sub MyDeck()
dbl = 876.21
End Sub
Sub MyExample1()
MsgBox dbl
End Sub
🔁 Теперь, даже после выполнения MyDeck, переменная dbl остаётся в памяти, и её значение доступно в MyExample1.
🔵 Private переменные
Если переменная нужна только в рамках одного модуля, используйте Private:
Private userScore As Integer
Она будет доступна всем процедурам в этом модуле, но недоступна из других модулей. Это удобно для защиты данных от «чужих» макросов.
🧪 Пример: как это работает на практике
Давайте соберём всё вместе:
' В модуле 1
Public userName As String
Sub SetName()
userName = "Екатерина"
End Sub
Sub ShowName()
MsgBox "Имя пользователя: " & userName
End Sub
📌 Что будет, если мы сначала запустим SetName, а потом ShowName?
✅ Получим сообщение с именем: "Имя пользователя: Екатерина". Значение userName сохранено в системной памяти.
А теперь:
' В модуле 2
Sub TryToAccess()
MsgBox userName ' Ошибка: переменная не определена
End Sub
Если переменная была Private, вызов из другого модуля приведёт к ошибке — она просто не видна за пределами своей «зоны ответственности».
⚠️ Частые ошибки при работе с переменными
📦 Когда какие переменные использовать
🔁 Что нужно запомнить
- Процедуры можно вызывать друг из друга с помощью Call или без него.
- Локальные переменные исчезают после завершения процедуры.
- Чтобы сохранить значение между процедурами — используйте Public.
- Чтобы ограничить доступ к переменной — используйте Private в модуле.
- Объявляйте переменные в начале модуля, если они нужны вне процедур.
🧭 Для тех, кто хочет углубиться
- 📚 Попробуйте изменить значение Public переменной вручную и понаблюдайте, как это влияет на другие процедуры.
- 🛠️ Создайте несколько модулей, экспериментируя с Private и Public, чтобы чётко почувствовать разницу.
- 🧼 Придумайте механизм сброса глобальных переменных в начале макроса, если не хотите, чтобы они «жили» вечно.
Подпишитесь на канал и оставьте комментарий!