learning the basics of passing variables

[mcranmoss]

I'm trying to teach myself the rudiments of passing variables. The following procedure produces a 'Variable not defined' error on line 1. Can anyone explain why this is?

(A1 contains a string)

thanks,
Mark

Public Function called(ByRef x As Variant) As Variant

x = ActiveWorksheet.Range("A1").Value

End Function



Public Function calledtwo(ByRef y As Variant)

y = "String2"

End Function

Sub caller()


Dim x As Variant
Dim y As Variant

called x
calledtwo y



MsgBox x & y

End Sub

 

[MARK858]

ActiveSheet rather than ActiveWorksheet?

 

[mcranmoss]

oh yes. How simple.

by the way, is there a difference between to following to lines? Does the second one default to variant anyway?


Public Function called(ByRef x As Variant) As Variant

Public Function called(ByRef x As Variant)
</pre>

 

[MARK858]

Perhaps the links below will help you in the right direction.

http://www.cpearson.com/excel/DeclaringVariables.aspx
http://www.ozgrid.com/VBA/variables.htm
https://www.google.co.uk/url?sa=t&rct=j&q=&esrc=s&source=web&cd=7&ved=0CFoQFjAG&url=https%3A%2F%2Fforums.runge.com.au%2Fattachment.php%3Fattachmentid%3D14%26d%3D1122254711&ei=JszlT-PgMemp0QX6vZSUCQ&usg=AFQjCNE-g8xcW5-bMVY7VLRGn0jyV60vBA&sig2=UVn5om8IQhzdeKuRqtLTOQ