在模块B中调用其值在模块A中定义的全局/公共变量

我编写了4个宏来执行操作，但是由于某些宏在2个工作簿之间切换，因此需要用户输入2个输入以确保使用了正确的文件。我只能访问其中一些文件，但我知道最终我将可以访问其余35个文件。如果没有输入，则必须手动更改宏代码中的文件名，但是我不想这样做，所以我使用了输入。但是，既然我具有正确格式的所有文件，那么我尝试使用一个单独的宏，该宏在单独的工作簿中具有其他文件的列表，然后打开这些文件并执行这些宏，但是这需要输入a很多。所以现在，我正在尝试消除对输入的需求。但是我不熟悉公共变量，并且对其他子例程的调用有些熟悉。

我的设置是这样的：

option explicit
public current as string

Sub master_macro
dim i as integer
dim path as string
dim wb as workbook
dim sht as worksheet

set wb = workbooks("name.xlsx")
set sht = wb.worksheets(1)
path = "C:\xxx\"
wb.activate
for i = 1 to 20
    currun = sht.cells(i,1).value 'this takes the value from the separate workbooks that has the file names
    full_currun = currun & ".xlsx"
    with workbooks.open(path & full_currun)
        .activate
        call blanks
        call lookup
        call transfer
        call combine
        .save
        .close
    end with
next i

最后2个宏在2张纸之间切换。因此，在这些宏中，尽管名称不同，但仍会在输入框内生成currun。

nam = inputbox("yadda yadda")
set wb = workbooks(nam & ".xlsx")

我正在尝试获取在master宏中定义到macro3和macro4的当前值。