>Спасибо, это я понял. Проблема была в том, что её надо сначала с помощью
>DoCmd открыть модально, а потом передать переменную, но если мы её
>открываем модально - код не идет дальше пока мы её не закроем :) и нет
>возможности передать переменную

Зачем же нет возможности?

Есть форма1, из которой будем открывать модально форма2 и что-то делать посредством последней. В модуле форма1 пишем

public MySuperVar as byte

private sub BtnOpenNextForm_Click()
MySuperVar=13
docmd.openform "форма2",acnormal,,,,acdialog
end sub

В модуле форма2 пишем

private sub form_onopen()
msgbox Forms!форма1.mysupervar
msgbox Forms!форма1.mysupervar
msgbox Forms!форма1.mysupervar
end sub

Т.е. и код исполняется (правда, в форме 2), и к переменной формы 1 обратиться можно.