You probably want something like this...


Sub Test()
Dim x as string

X = "Something"
Call Test2(X)'Pass value to next procedure
End Sub

Sub Test2(str as String)'receiving variable  cannot be same name as
calling procedure, and must be same dimension. i.e. passing string to
string.

Write code here!

End Sub