COLOR DE CELDA¡¡

04/04/2008 - 00:23 por Veronika | Informe spam
Saludos amigos.

Como puedo cambiar el color de una celda cuando cuando el cursor se
posiciona sobre ella.

Como tengo muchas celdas de colores, quisiera que al focalizarse se ponga el
fondo de color negro y el texto blanco.

e buscado por varios foros y no e conseguido respuesta,, es algo similar a
la siguiente pregunta que aun no tiene respuesta, que a la letra dice:

"Yo recuerdo que antes hace años en Quattro Pro lo podia hacer para
que sea mas facil de notar el cursor, yo recuerdo que si el cursor estaba
por ejemplo en D3, podias hacer que te pintara de un color amarillo clarito
(el que elegia) todas las celdas (incluyendo el encabezado de fila y
columnas para ese punto) , te pintaba D1,D2,D3 y A3,B3,C3,D3

Pero no se si en excel hay forma de hacerlo, hasta cambiando el registro si
es necesario. ..."

Amigos, gracias por toda respuesta que me puedan brindar.

Veronika.
Alumna de la Universidad de San Cristobal - Lima - Perú

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
04/04/2008 - 03:03 | Informe spam
hola, Veronika !

Como puedo cambiar el color de una celda cuando cuando el cursor se posiciona sobre ella...



puedes usar codigo (vba/macros) y/o instalar un complemento de terceros desde la siguiente pagina:
-> http://www.cpearson.com/excel/RowLiner.htm
(solo toma en cuenta que se pierde el beneficio del des-hacer -undo, ctrl+z-) :-(

alternativas: por formatos condicionales (menu) formato / formato condicional...
y (un poco de) apoyo con macros en el modulo de eventos de la hoja
-> click-derecho sobre la pestana con el nombre de la hoja y -> ver codigo...
1) selecciona todas las celdas de la hoja
(puedes usar el recuadro superior-izquierdo de los encabezados de fila/columna)
(o las combinaciones de teclado: mayusc+espacio seguidas de ctrl+espacio)
2) (menu) formato / formato condicional...
cond 1: formula: =y(fila()=celda("fila"),columna()=celda("columna"))
formato: [selecciona el color, trama, bordes, ... de tu preferencia]
3) copia las siguientes lineas (en el modulo de codigo de esa hoja):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

existen mas 'combinaciones' de formulas y formatos [bordes sobre todo] segun 'necesidades'
[p.e. cuando quieres que se 'coloree' TODA la fila/columna donde esta la celda 'activa']...
-> los formatos 'sugeridos' en los bordes para...
las filas: SOLO superior e inferior
las columnas: SOLO izquierdo y derecho
-> formulas para los formatos condicionales:
1) en cruz:
cond1: =fila()=celda("fila")
cond2: =columna()=celda("columna")
2) 'L' en espejo [o lo que es lo mismo, 'de aqui... p'atras']
cond1: =y(fila()=celda("fila"),columna()<=celda("columna"))
cond2: =y(columna()=celda("columna"),fila()<=celda("fila"))
3) 'L' en espejo 'de cabeza' [o lo que es lo mismo, 'de aqui... pa'lante']
cond1: =y(fila()=celda("fila"),columna()>=celda("columna"))
cond2: =y(columna()=celda("columna"),fila()>=celda("fila"))
=> EXCLUYENDO a la celda 'activa' <1) en cruz:
cond1: =y(fila()=celda("fila"),columna()<>celda("columna"))
cond2: =y(columna()=celda("columna"),fila()<>celda("fila"))
2 y 3.- ['L' y 'L' invertida]
[cambiar] <= a < [cambiar tambien] >= a >
=SIN bordes y 'en cruz' [utilizando SOLO UNA -de las tres- condiciones de formato]
cond1: =o(fila()=celda("fila"),columna()=celda("columna"))
==
Respuesta Responder a este mensaje
#2 Veronika
04/04/2008 - 18:19 | Informe spam
Gracias Hector.

Era lo que necesitaba, ya funciona cada vez que posiciono el cursor me
cambia de color, suficiente con los pasos 1,2 y 3.

Solo un detallito,, como hago para que funcione en todas mis hojas, tal vez
lo tenga que hacer uno por uno.

Gracias por toda respuesta que me puedas brindar.

Veronika.
Alumna de la Universidad de San Cristobal - Lima - Perú


"Héctor Miguel" escribió:

hola, Veronika !

> Como puedo cambiar el color de una celda cuando cuando el cursor se posiciona sobre ella...

puedes usar codigo (vba/macros) y/o instalar un complemento de terceros desde la siguiente pagina:
-> http://www.cpearson.com/excel/RowLiner.htm
(solo toma en cuenta que se pierde el beneficio del des-hacer -undo, ctrl+z-) :-(

alternativas: por formatos condicionales (menu) formato / formato condicional...
y (un poco de) apoyo con macros en el modulo de eventos de la hoja
-> click-derecho sobre la pestana con el nombre de la hoja y -> ver codigo...
1) selecciona todas las celdas de la hoja
(puedes usar el recuadro superior-izquierdo de los encabezados de fila/columna)
(o las combinaciones de teclado: mayusc+espacio seguidas de ctrl+espacio)
2) (menu) formato / formato condicional...
cond 1: formula: =y(fila()=celda("fila"),columna()=celda("columna"))
formato: [selecciona el color, trama, bordes, ... de tu preferencia]
3) copia las siguientes lineas (en el modulo de codigo de esa hoja):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

existen mas 'combinaciones' de formulas y formatos [bordes sobre todo] segun 'necesidades'
[p.e. cuando quieres que se 'coloree' TODA la fila/columna donde esta la celda 'activa']...
-> los formatos 'sugeridos' en los bordes para...
las filas: SOLO superior e inferior
las columnas: SOLO izquierdo y derecho
-> formulas para los formatos condicionales:
1) en cruz:
cond1: =fila()=celda("fila")
cond2: =columna()=celda("columna")
2) 'L' en espejo [o lo que es lo mismo, 'de aqui... p'atras']
cond1: =y(fila()=celda("fila"),columna()<=celda("columna"))
cond2: =y(columna()=celda("columna"),fila()<=celda("fila"))
3) 'L' en espejo 'de cabeza' [o lo que es lo mismo, 'de aqui... pa'lante']
cond1: =y(fila()=celda("fila"),columna()>=celda("columna"))
cond2: =y(columna()=celda("columna"),fila()>=celda("fila"))
=> EXCLUYENDO a la celda 'activa' <> 1) en cruz:
cond1: =y(fila()=celda("fila"),columna()<>celda("columna"))
cond2: =y(columna()=celda("columna"),fila()<>celda("fila"))
2 y 3.- ['L' y 'L' invertida]
[cambiar] <= a < [cambiar tambien] >= a >
=> SIN bordes y 'en cruz' [utilizando SOLO UNA -de las tres- condiciones de formato]
cond1: =o(fila()=celda("fila"),columna()=celda("columna"))
==



Respuesta Responder a este mensaje
#3 Héctor Miguel
04/04/2008 - 22:30 | Informe spam
hola, Veronika !

... ya funciona cada vez que posiciono el cursor me cambia de color, suficiente con los pasos 1,2 y 3.
Solo un detallito,, como hago para que funcione en todas mis hojas, tal vez lo tenga que hacer uno por uno...



para todas (o varias de) las hojas en el libro...

a) los pasos 1 y 2 SI es necesario aplicarlos a cada hoja :-((

b) el paso 3 podrias aplicarlo solamente en el modulo de codigo de tu libro (ThisWorkbook)
-> en el evento 'Workbook_SheetSelectionChange'
o (igualmente) copiarlo para cada una de las hojas donde vayas a establecer este metodo ;)

saludos,
hector.

__ la consulta anterior __
Como puedo cambiar el color de una celda cuando cuando el cursor se posiciona sobre ella...



puedes usar codigo (vba/macros) y/o instalar un complemento de terceros desde la siguiente pagina:
-> http://www.cpearson.com/excel/RowLiner.htm
(solo toma en cuenta que se pierde el beneficio del des-hacer -undo, ctrl+z-) :-(

alternativas: por formatos condicionales (menu) formato / formato condicional...
y (un poco de) apoyo con macros en el modulo de eventos de la hoja
-> click-derecho sobre la pestana con el nombre de la hoja y -> ver codigo...
1) selecciona todas las celdas de la hoja
(puedes usar el recuadro superior-izquierdo de los encabezados de fila/columna)
(o las combinaciones de teclado: mayusc+espacio seguidas de ctrl+espacio)
2) (menu) formato / formato condicional...
cond 1: formula: =y(fila()=celda("fila"),columna()=celda("columna"))
formato: [selecciona el color, trama, bordes, ... de tu preferencia]
3) copia las siguientes lineas (en el modulo de codigo de esa hoja):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida