Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

BUSCAR LETRAS EN CELDAS

08/09/2005 - 06:16 por DANILO ARANGO | Informe spam
Ayuda Hacer una pregunta
Hola Foro

Alguien me puede ayudar: necesito buscar en las celdas de una columna si hay
datos con letras o simbolos por ejem:

columa A
1 789455
2 45877
3 AW5875
4 458-4846
Es este caso las fila 3 tiene letras y la fila 4 tiene un simbolo -, lo que
busco es una macro que me recorra toda la columna hasta donde tenga celdas
con datos si no encuentra datos con letras o simbolos me ejecuta una macro
pero si encuentra me ejecuta otra.
Sera posible esto ?

De antemano muchas gracias

Danilo A.
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 KL
08/09/2005 - 07:05 | Informe spam
Hola Danilo,

Segun como quieres tratar los espacios intercalados, los siguientes mactros
deberan darte las ideas iniciales:

Saludos,
KL

Sub Test1()
For Each c In Range("A1:A10")
If IsEmpty(c) Then
ElseIf IsNumeric(Replace(c, " ", "")) Then
c.Offset(, 1) = "NUMERO"
Else
c.Offset(, 1) = "TEXTO"
End If
Next
End Sub

Sub Test2()
For Each c In Range("A1:A10")
If IsEmpty(c) Then
ElseIf IsNumeric(c) Then
c.Offset(, 1) = "NUMERO"
Else
c.Offset(, 1) = "TEXTO"
End If
Next
End Sub

Preguntas similares

 

Busqueda sugerida :