Глобальная переменная. VBA

Формулировка задачи:

Есть модуль Module, в нём есть переменная CurrentName типа String и процедура SetCurrentName, инициализирующая переменную.
В WorkBook_Open() создаётся кнопка в тулбаре и вызывается SetCurrentName с ненулевым параметром.
На момент нажатия кнопки в тулбаре, CurrentName = "". Из-за чего?

Решение задачи: «Глобальная переменная. VBA»

textual
                            Листинг программы 
                        
                            <font color="blue">Option</font> <font color="blue">Explicit</font>
<font color="blue">Public</font> x <font color="blue">As</font> <font color="blue">Long</font>