Generación de Números Alfanuméricos aleatorios

Estuvo bueno eso de "números alfanuméricos", o son numeros o es
alfanumerico, me recuerda al viejo y conocido refran "antes era
indeciso, ahora ya no se"

randomize
s=""
for i=1 to 8
do
pH+cint((122-48)*rnd())
loop until (p>H and p<W) or (p>e and p<) or (p>— and
p<2)
' de 48-57 0-9
' de 65-90 a-z
' de 97-122 A-Z
s=s & chr(p)
next
msgbox s

Alguien sabe o conoce alguna funcion de VBA para excel que me genere números
alfanuméricos aleatorios de 8 cifras?.
Muchas gracias,

Alejandro.

Muchas Gracias Manuel!
Salu2,

Alex
"Manuel Romero" <m.r.o.m.e.r.o.p@@@@h.o.t.m.a.i.lc.o.m.> escribió en el
mensaje news:

Estuvo bueno eso de "números alfanuméricos", o son numeros o es
alfanumerico, me recuerda al viejo y conocido refran "antes era indeciso,
ahora ya no se"

randomize
s=""
for i=1 to 8
do
pH+cint((122-48)*rnd())
loop until (p>H and p<W) or (p>e and p<) or (p>— and p<2)
' de 48-57 0-9
' de 65-90 a-z
' de 97-122 A-Z
s=s & chr(p)
next
msgbox s

Alguien sabe o conoce alguna funcion de VBA para excel que me genere
números alfanuméricos aleatorios de 8 cifras?.
Muchas gracias,

Alejandro.