Create two modules, in module1 put:

Sub macro_2()
MsgBox myvar
End Sub
in module2 put:
Public myvar As String
Sub macro_1()
myvar = "testing"
Call Module1.macro_2
End Sub
run macro_1 in module2, you should get "testing" in your msgbox - is this what you mean?