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

   
Vista:

Como hago para que Call pase el valor en VB

Publicado por alex (2 intervenciones) el 14/06/2008 23:41:12
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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como hago para que Call pase el valor en VB

Publicado por JuanC (792 intervenciones) el 15/06/2008 13:32:15
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar