fjiate si te sirve esta funcion que te hice..
function cortarApartir(desde,cadena)
'esta funcion devuelve la porcion de cadena encontrada
'a partir de la aparicion del caracter de espacio despues
'de la posicion especificada en desde.
dim caracterCortador,enc
caracterCortador = " "
enc = instr(desde,cadena,caracterCortador)
cortarApartir = mid(cadena,enc + 1)
end function
como dijo bakanzip
Cita: mueva los caracoles compadre..quemese un pokito tambien