Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Resaltar una fila

2,106 views
Skip to first unread message

Manuel

unread,
May 4, 2009, 9:22:35 PM5/4/09
to
Deseo cuando esté en una casilla que me resalte la fila de un color.
Es decir que si estoy en C3 me resalte de un color la fila 3 completa.
¿Cómo lo puedo hacer?

Saludos,
Manuel

H�ctor Miguel

unread,
May 4, 2009, 10:13:04 PM5/4/09
to
hola, Manuel !

> ... cuando este en una casilla que me resalte la fila de un color.
> Es decir que si estoy en C3 me resalte de un color la fila 3 completa...

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...

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("row"),columna()=celda("col"))
formato: (selecciona el color, trama, bordes, ... de tu preferencia)

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...

3) copia las siguientes lineas (en el modulo de codigo de esa hoja):
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub

o... si a tu modelo le afecta un re/calculo en cada (re)seleccion de la celda activa, cambia a...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

la diferencia entre un codigo y otro es un ligero/consante parpadeo si utlizas el ScreenUpdating
(o el efecto de los re/calculos del modelo completo ?)

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("row")
cond2: =columna()=celda("col")
2) L en espejo (o lo que es lo mismo, de aqui... patras)
cond1: =y(fila()=celda("row"),columna()<=celda("col"))
cond2: =y(columna()=celda("col"),fila()<=celda("row"))
3) L en espejo de cabeza (o lo que es lo mismo, de aqui... palante)
cond1: =y(fila()=celda("row"),columna()>=celda("col"))
cond2: =y(columna()=celda("col"),fila()>=celda("row"))
=> EXCLUYENDO a la celda activa <=
1) en cruz:
cond1: =y(fila()=celda("row"),columna()<>celda("col"))
cond2: =y(columna()=celda("col"),fila()<>celda("row"))
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("row"),columna()=celda("col"))
=====


Manuel

unread,
May 5, 2009, 7:52:03 PM5/5/09
to
Héctor:

Saludos.

Eso mismo es lo que deseaba.
A pesar de que no sale inmediatamente al "pararse" sobre la celda",
solo después que escribes algo en esta.

Cordialmente,
Manuel


On 5 mayo, 02:13, "Héctor Miguel" <NOhemiordiS...@PLShotmail.com>
wrote:

H�ctor Miguel

unread,
May 5, 2009, 8:19:54 PM5/5/09
to
hola, Manuel !

> Eso mismo es lo que deseaba.

> A pesar de que no sale inmediatamente al "pararse" sobre la celda", solo despues que escribes algo en esta.

1) a cual de todos los procedimientos te refieres ?

2) estas haciendo uso de los eventos en el modulo de codigo de la hoja "apropiada" ?

3) cual evento estas utilizando ?


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

o
Private Sub Worksheet_Change(ByVal Target As Range)

saludos,
hector.

__ OP __

Manuel

unread,
May 5, 2009, 10:51:36 PM5/5/09
to
Héctor:

Estoy usando:


1) en cruz:
> > cond1: =fila()=celda("row")
> > cond2: =columna()=celda("col")

Yo uso el office en inglés, por lo que sería
> > cond1: =row()=cell("row")
> > cond2: =col()=cell("col")

Saludos,
Manuel

On 6 mayo, 00:19, "Héctor Miguel" <NOhemiordiS...@PLShotmail.com>
wrote:

> > =====- Ocultar texto de la cita -
>
> - Mostrar texto de la cita -

H�ctor Miguel

unread,
May 5, 2009, 11:16:34 PM5/5/09
to
hola, Manuel !

> Estoy usando:
> 1) en cruz:
>> cond1: =fila()=celda("row")
>> cond2: =columna()=celda("col")

> Yo uso el office en ingles, por lo que seria


>> cond1: =row()=cell("row")
>> cond2: =col()=cell("col")

y... con respecto de esta parte de la propuesta inicial ???
=====


>> 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...
>>
>> 3) copia las siguientes lineas (en el modulo de codigo de esa hoja):
>> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
>> Range("a1").Calculate
>> End Sub
>>
>> o... si a tu modelo le afecta un re/calculo en cada (re)seleccion de la celda activa, cambia a...
>> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
>> Application.ScreenUpdating = True
>> End Sub
>>
>> la diferencia entre un codigo y otro es un ligero/consante parpadeo si utlizas el ScreenUpdating
>> (o el efecto de los re/calculos del modelo completo ?)

=====

saludos,
hector.


Manuel

unread,
May 6, 2009, 2:56:56 PM5/6/09
to
Perfecto con la opción 3.

Saludos,
Manuel

On 6 mayo, 03:16, "Héctor Miguel" <NOhemiordiS...@PLShotmail.com>
wrote:

sheca...@gmail.com

unread,
Oct 4, 2012, 12:57:24 PM10/4/12
to

vl9...@gmail.com

unread,
Jun 27, 2016, 2:55:18 AM6/27/16
to
Espero que aún sigan leyendo este artículo.......
¿Alguien podría explicarme cómo hacerlo hoy por hoy? Me es imposible... No me da la opción de "ver código" en la hoja al hacer click derecho sobre el nombre y tampoco me da como válido el código:

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

En la secuencia de comandos de la página.
Gracias.

vega.p...@gmail.com

unread,
Aug 23, 2016, 11:21:00 PM8/23/16
to
alt + f11
:)
Yo tambien tenía una pregunta, pero no creo que me la respondan, era como colorear las fila 5,6 y 7 de esa fila.

Saludos.

Juan Jose Mora Rocha

unread,
Nov 2, 2022, 10:12:35 PM11/2/22
to
Utiliza el siguiente código en Apps Script

function onSelectionChange(e) {
var libro=e.source
var hoja =libro.getActiveSheet();
var filas=hoja.getMaxRows()
var columnas=hoja.getMaxColumns()

hoja.getRange (1,1,filas,columnas).setBackground("white")

var activa=SpreadsheetApp.getActiveRange();
var fila=activa.getRow();
var columna=activa.getColumn();
hoja.getRange(fila,1,1,columnas).setBackground("#BDEAFF")
activa.setbackground("#80B4FF")

}

Keily Contreras

unread,
Oct 13, 2023, 5:48:29 PM10/13/23
to
hola cuando utilizo la opcion que da de Apps Script me sale esto:Registro de ejecución
16:46:16 Aviso Se ha iniciado la ejecución
16:46:16 Error
TypeError: Cannot read properties of undefined (reading 'source')
onSelectionChange @ PINTAR.gs:2
me ayudan por fis
0 new messages