Export GetStuff As GetThings Export DoStuff Dim foo foo = "somthing" Function GetStuff GetStuff = "got the stuff" End Function Sub DoStuff Print "do the stuff" End Sub