Чувствую себя идиотом...Не могу передать переменную из модуля... - VB

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

Есть экселевский файл. В нем есть модуль с кодом. В коде есть переменная fl типа Boolean.
Так же есть лист, в коде которого нужно использовать ту переменную. Никак не получается ее передать.
Как это сделать?)

Решение задачи: «Чувствую себя идиотом...Не могу передать переменную из модуля...»

textual
                            Листинг программы 
                        

                            <font color="00AA00">' код листа Sheet1</font>
<font color="blue">Private</font> <font color="blue">Sub</font> CommandButton1_Click()
    <font color="blue">Dim</font> fl <font color="blue">As</font> <font color="blue">Boolean</font>
    fl = False
    <font color="blue">Call</font> Macro1(fl)
    MsgBox (<font color="teal">"Value of fl is "</font> & fl)
<font color="blue">End</font> <font color="blue">Sub</font>

<font color="00AA00">' код модуля Module1</font>
<font color="blue">Sub</font> Macro1(<font color="blue">ByRef</font> b <font color="blue">As</font> <font color="blue">Boolean</font>)
    b = <font color="blue">Not</font> b
<font color="blue">End</font> <font color="blue">Sub</font>
                        