elegir letras aleatoriamente

[evaantelo]

Hola!
Como puedo elegir letras (entre A y Z) de modo aleatorio?
He intentado utilizar la función Rnd del siguiente modo:
intNum = Int((Rnd * 64) + 1)
strLetra = CStr(intNum)
pero asi solo paso el numero devuelto a una cadena.
Tambien he probado del siguiente modo:
strLetra = Str((Rnd * 65) + 1)
con resultados practicamente iguales.
Podeis ayudarme con esto?
Gracias!!

[Beakdan]

Evaantelo:

Usa esto:

Código:

strLetra = Chr$(Int(Rnd * 26) + 65&)

Saludos

[lucasiramos]

Acordate antes de cada Rnd, en la línea anterior, de usar Randomize.
Esto es textual del MSDN

Randomize usa número para iniciar el generador de números aleatorios de la función Rnd, asignándole un nuevo valor de semilla. Si se omite número, el valor devuelto por el reloj del sistema se usa como nuevo valor de semilla.
Si no se usa Randomize, la función Rnd (sin argumentos) usa el mismo número como semilla la primera vez que se llama y, a partir de ese momento, usa el último número generado como valor de semilla.

El siguiente ejemplo muestra el uso de la instrucción Randomize:

Dim MiValor, Respuesta
Randomize ' Inicia el generador de números aleatorios.

Do Until Respuesta = vbNo
MiValor = Int((6 * Rnd) + 1) ' Genera un valor aleatorio entre 1 y 6.
MsgBox MiValor
Response = MsgBox ("¿Volver a girar? ", vbYesNo)
Loop