validar celda mediante macro

14/07/2003 - 09:30 por Francisco Sáez R. | Informe spam
Buenas noches estimados foristas, mi consulta es la siguiente tengo una hoja
llamada "DATOS" y dos celdas especificas que necesito automatizar de la
siguiente manera:
P.e. si en "E2" anoto un valor numerico cualquiera, necesito que
inmediatamente me valida la celda "I7" con el valor 0 "cero" y viseversa,
osea si en "I7" anoto un valor, que me valide "E2" con valor 0 "cero",
espero que se pueda hacer, de ante mano muchas gracias y seguimos en
contacto.
Un saludo,
_____________________________________
Francisco Sáez R.
Stgo-Chile

PD.: Trabajo con Office XP
 

Leer las respuestas

#1 Adolfo Fernández
14/07/2003 - 10:30 | Informe spam
Hola Francisco,
Te pongo un ejemplo de como al modificar la celda E2 se borra el contenido
de la celda I7.
Esto te puede servir de punto de partida para lo que tu quieres hacer. Te
queda comprobar si la celda que se modifica es E2 o I7 y ademas que el valor
introducido en ambas celdas sea numérico ( esto último no hace falta que lo
compruebes con vba, al opción de validar datos te puede servir)

Private Sub Worksheet_Change(ByVal Target As Range)
Dim vrange As Range
Set vrange = Range("E2")
If Union(Target, vrange).Address = vrange.Address Then
Range("I7").ClearContents
End If

End Sub
Si te hace falta más ayuda no dudes en preguntar

Un saludo,
Adolfo

"Francisco Sáez R." escribió en el mensaje
news:#
Buenas noches estimados foristas, mi consulta es la siguiente tengo una


hoja
llamada "DATOS" y dos celdas especificas que necesito automatizar de la
siguiente manera:
P.e. si en "E2" anoto un valor numerico cualquiera, necesito que
inmediatamente me valida la celda "I7" con el valor 0 "cero" y viseversa,
osea si en "I7" anoto un valor, que me valide "E2" con valor 0 "cero",
espero que se pueda hacer, de ante mano muchas gracias y seguimos en
contacto.
Un saludo,
_____________________________________
Francisco Sáez R.
Stgo-Chile

PD.: Trabajo con Office XP


Preguntas similares