Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

REFERENCIA CIRCULAR

16/12/2003 - 09:08 por Guillermo | Informe spam
Ayuda Hacer una pregunta
Hola a todos:
Complicando mas la consulta que realice ayer y que me contestó
magistralmente Zapata

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("T10").Address Then Range("S10").Value Range("S10").Value + Range("T10").Value
End Sub

Y entre un rango de celdas?
es decir entre S10 y S100 y T10 y T100
"Mortus est qui non respira"
Cayo Aurelio Craso 110 - 43 a.C.
Medico de las legiones
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Zapata
16/12/2003 - 20:36 | Informe spam
Y entre un rango de celdas?


es decir entre S10 y S100 y T10 y T100



Pos ahí lo tienes creo que funciona si no me lo comentas..
Un saludo

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("T10:T100")) Is Nothing Then Exit Sub
Target.Offset(0, -1).Value = Target.Offset(0, -1).Value + Target.Value
End Sub

Preguntas similares

 

Busqueda sugerida :