PASSING A STRING VALUE

S

Sirron

I have 2 modules my first module contains a string that
has a value and I want to pass that string value to
another module how can this be done?
thanks Sirron
 
H

Harald Staff

Sub test()
Call SomewhereElse("Hi Sirron !")
End Sub

Sub SomewhereElse(What As String)
Dim L As Long
For L = 1 To 3
MsgBox What, , L & " of 3"
Next
End Sub
 
Top