Preguntita sobre excel.

[Azarías]

Alguien sabe como puedo validar una celda para que solo pueda escribir caracteres ( letras ) y ningun otro tipo de dato en ella, ya estuve buscando en inter pero no encuento nada en concreto.
Lo q necesito es q esa celda solo me acepte nombres por decir algo.

De antemano agradezco su valiosa colaboración. 

[chester08]

Bueno lo que puedes hacer es  (excel 2007):

Seleccionar la celda que quieres validar.
Después te vas a la Ficha Datos --> y en el grupo "Herramientas de datos",  selecciondas el comando "Validacion de datos"

y ahi en el "Criterio de Evaluacion"
seleccionas si quieres

• Numero
• Decimales
• Fecha
• Texto
• Hora
• Personalizado

Espero haberte ayudado 

[papalota]

A mi no me sale criterio de evaluacion

[gcastellanos]

Acá está una breve explicación:

http://office.microsoft.com/es-es/excel-help/aplicar-validacion-de-datos-a-celdas-HP010072600.aspx

[mil123]

En la hoja donde tienes la celda a validar, le das click derecho en "ver codigo", insertas este codigo

Código: [Seleccionar]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address <> "$E$1" Then Exit Sub
     
    If Evaluate("SUMPRODUCT( --ISNUMBER( SEARCH({""1"",""2"",""3"",""4"",""5"",""6"",""7"",""8"",""9"",""""""""}, E1) ) )") > 0 Then
      With Application
        .EnableEvents = False
        .Undo
        .EnableEvents = True
      End With
    End If
     
    End Sub
asi no se podra insertar ningun numero en esa celda

nota: en este ejemplo "E1"

[Azarías]

Les agradezco sus aportes, pero aun sigo teiendo problemas, amigo el codigo q me pones ahi es de macros y aun asi no hace lo q deberia hacer

[chester08]

Les agradezco sus aportes, pero aun sigo teiendo problemas, amigo el codigo q me pones ahi es de macros y aun asi no hace lo q deberia hacer

EDIT: ¿y q es lo que no te funciona pues?
probe el codigo de mil123 y pues , hace lo que vos pediste.
(no lo habia visto antes   ). ¿en si que es lo queres?



mmmm proba de esta manera... 

Código: [Seleccionar]

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$B$10" Then
longitud = Len(Target)
For i = 1 To longitud
    digito = Mid(Target, i, 1)
    If IsNumeric(digito) Then
    With Application
        .EnableEvents = False
        .Undo
        .EnableEvents = True
      End With
      'Si encuentra un numero , pues no acepta la entrada
      'y hace un Undo , para  volver al texto anterior , si lo habia
      MsgBox ("No se permiten Numeros en esta celda")
      End If
Next

End If
End Sub


[chester08]

Mira ,sorry por el Doble Post.    ,
este de abajo solo te acepta caracteres de "a-zA-Z"
talvez te ayude....
y si lo llegas a resolver, no dudes en postear aqui la solucion , para que nos pueda ayudar en el futuro .

Código: [Seleccionar]

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$10" Then
longitud = Len(Target)
For i = 1 To longitud
    digito = Mid(Target, i, 1)
    If (Not Asc(digito) >= 97 Or Not Asc(digito) <= 122) Or (Not Asc(digito) >= 65 Or Not Asc(digito) <= 90) Then
    With Application
        .EnableEvents = False
        .Undo
        .EnableEvents = True
      End With
      'Si encuentra un numero , pues no acepta la entrada
      'y hace un Undo , para  volver al texto anterior , si lo habia
      MsgBox ("No se permiten Numeros en esta celda")
      End If
Next
End If
End Sub




[Azarías]

Hey se te agradece man si me furulo, ahora mi preguntita es como hacer para validar por ejemplo un rango de 5 celdas en la misma columna

[gcastellanos]

Creo que te conviene validar de esta forma:

(Excel 2007 / 2010)

Menú: Datos / Validación de datos / Validación de datos (otra vez) / pestaña "configuración"
En el campo "permitir" darle -Personalizada- y pegar la siguiente fórmula:

Si es excel 2003-2007:
=SUMAPRODUCTO(((ESERR(ENCONTRAR((EXTRAE(MAYUSC(B3), FILA(INDIRECTO("1:" & LARGO(B3))),1)), "AÁBCDEÉFGHIÍJKLMNÑOÓPQRSTUÚVWXYZ "))))*  1) = 0

Si es excel 2010:
=SUMAPRODUCTO(((ESERR(ENCONTRAR((MED(MAYUSC(B3), FILA(INDIRECTO("1:" & LARGO(B3))),1)), "AÁBCDEÉFGHIÍJKLMNÑOÓPQRSTUÚVWXYZ "))))*  1) = 0

OJO: En la fórmula estoy validando la celda B3, tenés que cambiar por la referencia que te interesa y luego al copiar a otra celda se cambia automáticamente la validación.

Eso es todo y te acepta mayúsculas, minúsculas y espacios.

Adjunto un archivo para ejemplo.
http://www.megaupload.com/?d=1627KPJ1