Excel - Como hago para que Call pase el valor en VB

Tengo problemas con la funcion Call en Visual Basic para Excel ya que el codigo de abajo cuando va a la subrutina Letras no pasa ningun valor en la variable letra asi lo ponga en parentesis sencillos o dobles o le ponga ByRef. En mi casa si corre pero en la Universidad que la version es mas antigua, no corre. Como puedo hacer para que me pase un valor A, B, etc. en letra??????

Private Sub Ejecutar_Click()

For dia = o to 365

columnafinal=2
Call Letras(columnafinal, (letra))
letra_fin = letra
'El resto del progarma

Next dia

End Sub
--------------------------------------...
Public Sub Letras(ByVal columna As Integer, ByRef letra As String)

Select Case columna
Case 1
letra = "A"
Case 2
letra = "B"
Case 3
letra = "C"
Case 4
letra = "D"
Case Else
Stop
End Select

End Sub

podés cambiar por el procedimiento por función

letra = Letras(columnafinal)

Public Function Letras(ByVal columna As Integer) As String
Select Case columna
Case 1
Letras = "A"
Case 2
Letras = "B"
Case 3
Letras = "C"
Case 4
Letras = "D"
Case Else
Stop
End Select
End Function

Saludos desde Baires, JuanC