Anular algunas teclas

hola, Este banDido ! :))

... evitar que puedan ser utilizadas ... la tecla Ñ, el acento, el signo +, etc. [...]

1.- si es por entrada 'directa' del usuario... podrias 'impedir'...
que se introduzcan [unos cuantos] caracteres 'prohibidos'
en la/s celda/s por medio de reglas de validacion [p.e.]...
selecciona la celda 'a1' [o un rango de celdas que 'inicie' en la celda 'a1'] y...
-> [menu] datos / validacion / [configuracion] permitir -> personalizada
+ en el campo de la formula 'introduce'... =>OJO que debe ser UNA SOLA LINEA<=y(eserror(encontrar("+",minusc(a1))),eserror(encontrar("ñ",minusc(a1))),
eserror(encontrar("á",minusc(a1))),eserror(encontrar("é",minusc(a1))),
eserror(encontrar("í",minusc(a1))),eserror(encontrar("ó",minusc(a1))),
eserror(encontrar("ú",minusc(a1))))
+ 'asegurate' de usar en el apartado de 'mensaje de error'... un 'estilo' de =>limite< + puedes 'personalizar' los mensajes para 'advertir' al usuario que NO debe usar 'tales o cuales' caracteres :))
=> la 'desventaja' es que el campo 'formula' tiene un limite de 255 caracteres :((
[y... con las 5 vocales acentuadas + la letra 'ñ' y el signo '+'... ya 'vamos' en 248]
[tampoco 'acepta' matrices y constantes] :((( <= 'esta'... SI que 'duele' :)) [excel 97, deja checar +]

2.- otra posibilidad, seria usando macros [probablemente el evento '_change' de 'la hoja'] =>¿comentas?<
saludos,
hector.

p.e. te recuerdo que 'mi' separador de argumentos es la coma ',' NO el punto y coma ';' ;)

Héctor,
¿Por qué escribes tan raro?. No se te entiende nada con tantos signos
innecesarios que pones en tu texto, aunque igual agradezco tu esfuerzo por
tratar de ayudar. En todo caso, lo que necesito quiero hacerlo mediante una
macro.

Un saludo
Quita la mosca para enviar un mensaje.
"Héctor Miguel" escribió en el mensaje
news:

hola, Este banDido ! :))

> ... evitar que puedan ser utilizadas ... la tecla Ñ, el acento, el signo

+, etc. [...]

1.- si es por entrada 'directa' del usuario... podrias 'impedir'...
que se introduzcan [unos cuantos] caracteres 'prohibidos'
en la/s celda/s por medio de reglas de validacion [p.e.]...
selecciona la celda 'a1' [o un rango de celdas que 'inicie' en la

celda 'a1'] y...

-> [menu] datos / validacion / [configuracion] permitir ->

personalizada

+ en el campo de la formula 'introduce'... =>OJO que debe ser UNA

SOLA LINEA<> =y(eserror(encontrar("+",minusc(a1))),eserror(encontrar("ñ",minusc(a1))),

eserror(encontrar("á",minusc(a1))),eserror(encontrar("é",minusc(a1))),
eserror(encontrar("í",minusc(a1))),eserror(encontrar("ó",minusc(a1))),
eserror(encontrar("ú",minusc(a1))))
+ 'asegurate' de usar en el apartado de 'mensaje de error'... un

'estilo' de =>limite<> + puedes 'personalizar' los mensajes para 'advertir' al usuario que
NO debe usar 'tales o cuales' caracteres :))

=> la 'desventaja' es que el campo 'formula' tiene un limite de 255

caracteres :((

[y... con las 5 vocales acentuadas + la letra 'ñ' y el signo '+'...

ya 'vamos' en 248]

[tampoco 'acepta' matrices y constantes] :((( <= 'esta'... SI que

'duele' :)) [excel 97, deja checar +]

2.- otra posibilidad, seria usando macros [probablemente el evento

'_change' de 'la hoja'] =>¿comentas?<>

saludos,
hector.

p.e. te recuerdo que 'mi' separador de argumentos es la coma ',' NO el

punto y coma ';' ;)

Esteban,

En todo caso, lo que necesito quiero hacerlo mediante una
macro.

Podrias probar asignando vacio a las teclas, por ejemplo:

Sub Inhabilitar()
With Application
.OnKey "~", ""
.OnKey "{ENTER}", ""
.OnKey "{RIGHT}", ""
End with
End Sub

Sub Rehabilitar()
With Application
.OnKey "~"
.OnKey "{ENTER}"
.OnKey "{RIGHT}"
End with
End Sub

No se te entiende nada con tantos signos
innecesarios que pones en tu texto

Pues personalmente creo q el hecho de q no los entiendas no quiere decir q
los signos sean innecesarios. Para algunos de nosotros (si no la mayoria)
llevan una carga informativa y emocional adicional, q por cierto esta
expresada de una forma muy compacta.

Saludos y Felices Festas!
KL

Gracias, KL. Voy a probar el código que me sugieres.
Respecto de los signos que usa Héctor, yo no he dicho que no los entiendo.
Dije que no se entiende lo que trata de decir, que no es lo mismo.
Un Feliz Año para tí también.

Un saludo
Quita la mosca para enviar un mensaje.
"KL" <lapink2000(at)hotmail.com> escribió en el mensaje
news:#

Esteban,

> En todo caso, lo que necesito quiero hacerlo mediante una
> macro.

Podrias probar asignando vacio a las teclas, por ejemplo:

Sub Inhabilitar()
With Application
.OnKey "~", ""
.OnKey "{ENTER}", ""
.OnKey "{RIGHT}", ""
End with
End Sub

Sub Rehabilitar()
With Application
.OnKey "~"
.OnKey "{ENTER}"
.OnKey "{RIGHT}"
End with
End Sub

>No se te entiende nada con tantos signos
> innecesarios que pones en tu texto

Pues personalmente creo q el hecho de q no los entiendas no quiere decir q
los signos sean innecesarios. Para algunos de nosotros (si no la mayoria)
llevan una carga informativa y emocional adicional, q por cierto esta
expresada de una forma muy compacta.

Saludos y Felices Festas!
KL