Resaltar celda

On Sun, 11 Sep 2005 18:36:43 -0500, "Héctor Miguel"
wrote:

hola [de nuevo[, chicos !

KL escribio en el mensaje ...
... el fallo empieza... de que se introduzca algun valor en cualquier celda
... el comportamiento del color condicional se vuelve impredecible
... sustituyendo Range("a1").Calculate por Application.ScreenUpdating = True ... no da problemas.

[tal parece que] 'combinar' la funcion celda(...) que SIN su segundo argumento es referencia a la celda 'activa'...
... con los formatos condicionales SIN 'forzar' a un 'refresco' de la pantalla [application.screenupdating]...
... deja 'campo abierto' para que el 'cabalistico 16' empieze a 'hacer de las suyas' :(
-> los formatos condicionales 'se pierden' por grupos de 16 filas y 're/comienzan' a partir de la siguiente fila 17 :-(

[creo que] solo queda 'vivir' con el ligero [aunque constante y quizas molesto] 'parpadeo' en cambios de seleccion de celdas :(

saludos,
hector.

Pues creo que esto que me indicais no funciona bien, o estoy haciendo
algo mal.

Ahora lo tengo montado asi:
En todas las celdas de la columna "B" tengo el formato condicional con
esta formula
ÎLDA("Fila")=FILA()

Y en el modulo de codigo de esa hoja tengo

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

Tambien he probado con esto

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub

En ambos casos no me funciona, ya que el modulo (el que lleva
Application.ScreenUpdating = True) solo resalta la celda de la columna
B cuando cambio de aplicacion y vuelvo a Excel, pero moviendome dentro
de la hoja, este donde este la celda activa, siempre queda resaltada
fija la misma. Si utilizo el segundo no hace nada.

Saludos,
Engel

On Mon, 12 Sep 2005 10:09:04 +0200, Engel wrote:

On Sun, 11 Sep 2005 18:36:43 -0500, "Héctor Miguel"
wrote:

hola [de nuevo[, chicos !

KL escribio en el mensaje ...
... el fallo empieza... de que se introduzca algun valor en cualquier celda
... el comportamiento del color condicional se vuelve impredecible
... sustituyendo Range("a1").Calculate por Application.ScreenUpdating = True ... no da problemas.

[tal parece que] 'combinar' la funcion celda(...) que SIN su segundo argumento es referencia a la celda 'activa'...
... con los formatos condicionales SIN 'forzar' a un 'refresco' de la pantalla [application.screenupdating]...
... deja 'campo abierto' para que el 'cabalistico 16' empieze a 'hacer de las suyas' :(
-> los formatos condicionales 'se pierden' por grupos de 16 filas y 're/comienzan' a partir de la siguiente fila 17 :-(

[creo que] solo queda 'vivir' con el ligero [aunque constante y quizas molesto] 'parpadeo' en cambios de seleccion de celdas :(

saludos,
hector.

Pues creo que esto que me indicais no funciona bien, o estoy haciendo
algo mal.

Ahora lo tengo montado asi:
En todas las celdas de la columna "B" tengo el formato condicional con
esta formula
ÎLDA("Fila")=FILA()

Y en el modulo de codigo de esa hoja tengo

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

Tambien he probado con esto

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub

En ambos casos no me funciona, ya que el modulo (el que lleva
Application.ScreenUpdating = True) solo resalta la celda de la columna
B cuando cambio de aplicacion y vuelvo a Excel, pero moviendome dentro
de la hoja, este donde este la celda activa, siempre queda resaltada
fija la misma. Si utilizo el segundo no hace nada.

Saludos,
Engel

Disculpar la torpeza, ya me funciona, el error estaba en la formula
del condicional donde dice "File" me equivoque al teclear y ponia
"Fole" y no me habia dado cuenta, teclee la "o" en vez de la "i" que
esta justo al lado.

Saludos,
Engel

hola, Engel !

... creo que esto que me indicais no funciona bien, o estoy haciendoalgo mal.
... lo tengo montado asi:... la columna "B" tengo el formato condicional con esta formula
ÎLDA("Fila")=FILA()
... en el modulo de codigo de esa hoja tengo
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub
... no me funciona, ya que el modulo (el que lleva Application.ScreenUpdating = True)
solo resalta la celda de la columna B cuando cambio de aplicacion y vuelvo a Excel
pero moviendome dentro de la hoja, este donde este la celda activa, siempre queda resaltada fija la misma [...]

la unica forma en que [hasta ahora] he podido 'reproducir' el comportamiento que describes...
-> que SOLO se 'actualiza' el color por el formato condicional al 'regresar' a excel desde otra aplicacion <- ...
ES... [p.e.] cuando la aplicacion esta en modo de calculo manual [y se combina la siguiente situacion]...
Y... el modulo de codigo ->de esa hoja<- NO ES el que tiene las instrucciones en el evento '_selectionchange' -???-

[probablemente]... existe algun otro codigo que pudiera 'interferir' con los eventos de las hojas 'individuales' ?
comentas datos adicionales ?
saludos,
hector.

Hola Engel,

Disculpar la torpeza, ya me funciona, el error estaba en la formula
del condicional donde dice "File" me equivoque al teclear y ponia
"Fole" y no me habia dado cuenta, teclee la "o" en vez de la "i" que
esta justo al lado.

Si ya te funciona, solo imaginate como fincionara todo si ahora cambias
"File" por "FILA" que es lo que realmente debe estar alli :-)

Saludos,
KL

On Mon, 12 Sep 2005 12:39:17 -0500, "Héctor Miguel"
wrote:

ÎLDA("Fila")=FILA()
... en el modulo de codigo de esa hoja tengo
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

Amigos KL, Hector Miguel y el resto,

Volviendo sobre este tema, ahora tengo esto que me indicasteis y que
funciona perfectamente y que me proporciona toda la linea activa de
una color determinado, pero me interesaria que ademas de mantener toda
la linea resaltada con este color, que la celda activa de esa linea
fuera de un color diferente al de toda la linea, ¿seria posible?,
¿como?

Saludos,
Engel