ELIMINAR

Hola Fernando,

Podrias probar una funcion personalizada VBA colocandola en un modulo
estandar del proyecto VBA de tu libro de Excel. Para ello:

1) Haz clic-derecho sobre el nombre de cualquier hoja en una de las pestañas
de la parte de abajo de la ventana de Excel.
2) Elige la opcion Ver Codigo para abrir el Editor VBA.
3) Una vez en el Editor VBA, ve al menu Insertar>Modulo
4) En la ventana mas grande a la derecha pega el codigo que te pongo a
continuacion:

'--Inicio Codigo-
Function SoloTexto(txt As String)
Application.Volatile
Dim txt_final As String, Letter As String
txt_final = ""
On Error Resume Next
For c = 0 To Len(txt)
Letter = Mid(txt, c, 1)
If InStr("0123456789", Letter) = 0 Then
txt_final = txt_final & Letter
End If
Next
SoloTexto = txt_final
End Function
'--Fin Codigo-

5) Pulsa Alt+F11 para volver a la hoja
6) si tienes tu valor alfanumerico en la celda [A1], entonces introduce la
siguiente formula en las celda [B1]:

=SoloTexto(A1)

Saludos,
KL



"Fernando Kohan" wrote in message
news:

Hola,,,, gracias por la ayida

Como puedo eliminar los caracteres alfanumericos de una cadena y dejar
solo
el valor sin las letras ?



Fenarro