Solved: Passing a variable

Can someone please help me with this code.
[VBA]Sub sortall()
mysort="G"
sort
End Sub

Sub sort
Dim e
e= Range ("Sheet1!" & mysort & "5").Value
'do some other stuff

End Sub
[/VBA]

I just want mysort in the Sub sort to = whatever variable I pass to it in another part of the code.

Thanks

[vba]

Sub sortall()
sort "G"
End Sub

Sub sort( ByVal mysort As String)
Dim e
e= Range ("Sheet1!" & mysort & "5").Value
'do some other stuff

End Sub
[/vba]