G
Guest
Hi there,
I have the following code (its simplified). I want to pass a value to a
routine and for it to be doubled. I thought by using ByRef it would come back
to the oriingal routine changed but I must be missing something. I have an
example below. I get 100 instead of 200 at the end of the Test procedure.
What am I doing Wrong.
Any help greatly appreciated.
Tx
Suzanne
Sub Test
Dim y
y =100
Call Test2(y)
Debug.Print y
End Sub
Sub Test2( ByRef x)
x = x *2
End Sub
I have the following code (its simplified). I want to pass a value to a
routine and for it to be doubled. I thought by using ByRef it would come back
to the oriingal routine changed but I must be missing something. I have an
example below. I get 100 instead of 200 at the end of the Test procedure.
What am I doing Wrong.
Any help greatly appreciated.
Tx
Suzanne
Sub Test
Dim y
y =100
Call Test2(y)
Debug.Print y
End Sub
Sub Test2( ByRef x)
x = x *2
End Sub