Iluminar Celda

20/11/2005 - 10:56 por Albymar | Informe spam
Hola a todos:

Esta es mi exposición y mi pregunta ...
a) Tengo una Hoja con dos tablas iguales ...
b) Realizo una división de pantalla (Menu: Ventana > Dividir) y situo una
tabla en la división de arriba y otra en la división de abajo, entonces ...

Mi pregunta es:

¿Que debo hacer para que, cuando me situo en una celda de la tabla de la
división de arriba, la celda correspondiente de la tabla de la división de
abajo se ilumine (cambie de color) y me sirva de referencia?

Gracias de antemano por vuestra ayuda...

Preguntas similare

Leer las respuestas

#6 Héctor Miguel
21/11/2005 - 22:34 | Informe spam
hola, Albymar !

a) Se podria "iluminar" la celda de la tabla1 Y la celda de la tabla 2?
b) Se podria realizar un scroll automatico en la division de consulta?



a) solo agrega en la formula una segunda 'condicion' para la fila [que sea = o +/-30] p.e.
en la tabla de arriba: =y(o(cela("fila")=fila(),celda("fila")=fila()+30),celda("columna")=columna())
en la tabla de abajo: =y(o(cela("fila")=fila(),celda("fila")=fila()-30),celda("columna")=columna())

b) a que te refieres +/- 'exactamente' con: '...realizar un scroll automatico en la division de consulta...' ???

saludos,
hector.
Respuesta Responder a este mensaje
#7 Albymar
21/11/2005 - 23:33 | Informe spam
Hola Hector ...
Te explico:
Mis tablas tienen aproximadamente 240 filas cada una,
cuando hago la division horizontal se queda en la tabla1 (arriba) el dato
"real" y en la tabla2 (abajo) el dato "previsto".
Lo que intento explicar es que cuando me situe en una celda de arriba, la
celda de abajo tambien se vea, y no tener que buscarla con la barra de
desplazamiento,

¡que mal me explico! ¿verdad?

A ver, lo que quiero es que las filas donde vaya introduciendo datos en la
tabla1(arriba)(p.e.: 70-90)se correspondan "automaticamente" con las que se
vean en la tabla2(abajo)(p.e.:310-330) y conforme me mueva por la de arriba,
la de abajo se mueva "al mismo son" que lo hace la de arriba.

Ojalá que me hayas entendido... y perdona por las molestias.
Gracias


"Héctor Miguel" escribió:

hola, Albymar !

> a) Se podria "iluminar" la celda de la tabla1 Y la celda de la tabla 2?
> b) Se podria realizar un scroll automatico en la division de consulta?

a) solo agrega en la formula una segunda 'condicion' para la fila [que sea = o +/-30] p.e.
en la tabla de arriba: =y(o(cela("fila")=fila(),celda("fila")=fila()+30),celda("columna")=columna())
en la tabla de abajo: =y(o(cela("fila")=fila(),celda("fila")=fila()-30),celda("columna")=columna())

b) a que te refieres +/- 'exactamente' con: '...realizar un scroll automatico en la division de consulta...' ???

saludos,
hector.



Respuesta Responder a este mensaje
#8 Héctor Miguel
22/11/2005 - 01:34 | Informe spam
hola, Albymar !

Mis tablas tienen aproximadamente 240 filas cada una... que cuando me situe en una celda de arriba
la... de abajo tambien se vea, y no tener que buscarla con la barra de desplazamiento [...]



si la 'distancia' entre la celda1 de la tabla1 a la celda1 de la tabla2 es siempre de 240 filas...
agrega las siguientes instrucciones en el eveno '_selectionchange' del modulo de codigo de 'esa' hoja...
With ActiveWindow
If .Panes.Count = 2 Then _
If .SplitRow > 0 Then _
.Panes(2).ScrollRow = .Panes(1).ScrollRow + 240
End With

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#9 Albymar
22/11/2005 - 11:10 | Informe spam
Hola, Hector:

Todo ha salido ...
PERFECTO, GENIAL, IMPRESIONANTE, SOBRESALIENTE, INSIGNE, EXTRAORDINARIO,
FENOMENAL ...

Me quedado una aplicación "dotada de una hermosura" que no me canso de verla
y manejarla ...

MUCHAS GRACIAS por ayudarme ...

Solo para los que quieran aprovecharse de esta genialidad del MAESTRO Hector
Miguel ...
Yo tengo Excel2003 y ...
Al agregar las siguientes instrucciones en el eveno '_selectionchange' del
modulo de codigo de 'esa' hoja... - he incluido 2 End If - quedando:
With ActiveWindow
If .Panes.Count = 2 Then _
If .SplitRow > 0 Then _
.Panes(2).ScrollRow = .Panes(1).ScrollRow + 240
End If
End If
End With

Gracias, otra vez y hasta otra.


"Héctor Miguel" escribió:

hola, Albymar !

> Mis tablas tienen aproximadamente 240 filas cada una... que cuando me situe en una celda de arriba
> la... de abajo tambien se vea, y no tener que buscarla con la barra de desplazamiento [...]

si la 'distancia' entre la celda1 de la tabla1 a la celda1 de la tabla2 es siempre de 240 filas...
agrega las siguientes instrucciones en el eveno '_selectionchange' del modulo de codigo de 'esa' hoja...
With ActiveWindow
If .Panes.Count = 2 Then _
If .SplitRow > 0 Then _
.Panes(2).ScrollRow = .Panes(1).ScrollRow + 240
End With

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida