Enamorate

SUSCRIBETE

Recibe en tu correo lo ultimo del blog totalmente gratis

¡suscribete ya!

Escribe tu correo electronico:

Delivered by FeedBurner

Elabore una funcion personalizada en XL que coloque la calificacion con letra obtenida por un alumno de acuerdo a:

< = 5 " cinco "

= 6 " seis"

= 7 " siete"

= 8 "ocho"

= 9 "nueve"

= 10 "diez"

Seria de la siguiente forma entrando a Excel , ejecutar alt F11
crear un nuevo modulo
y codificar de la siguiente forma :

Function aletra(calif As Integer) As String
Select Case calif
Case Is <= 5
aletra = "cinco"
Case Is = 6
aletra = "seis"
Case Is = 7
aletra = "siete"
Case Is = 8
aletra = "ocho"
Case Is = 9
aletra = "nueve"
Case Is = 10
aletra = "diez"
End Select
End Function