Discussion:
Resaltar una fila
(demasiado antiguo para responder)
Manuel
2009-05-05 01:22:35 UTC
Permalink
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
2009-05-05 02:13:04 UTC
Permalink
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
2009-05-05 23:52:03 UTC
Permalink
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
Post by Héctor Miguel
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...
->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...
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
    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 <=
    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"))
=====
Héctor Miguel
2009-05-06 00:19:54 UTC
Permalink
hola, Manuel !
Post by 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 __
Post by 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...
-> 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...
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
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 <=
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
2009-05-06 02:51:36 UTC
Permalink
Post by Héctor Miguel
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en inglés, por lo que sería
Post by Héctor Miguel
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
Saludos,
Manuel
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
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 __
Post by Héctor Miguel
... 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...
->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...
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
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 <=
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"))
=====- Ocultar texto de la cita -
- Mostrar texto de la cita -
Héctor Miguel
2009-05-06 03:16:34 UTC
Permalink
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
y... con respecto de esta parte de la propuesta inicial ???
=====
Post by Héctor Miguel
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...
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
2009-05-06 18:56:56 UTC
Permalink
Perfecto con la opción 3.

Saludos,
Manuel
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
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
Post by Héctor Miguel
-> click-derecho sobre la pestana con el nombre de la hoja y -> ver codigo...
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.
v***@gmail.com
2016-06-27 06:55:16 UTC
Permalink
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
y... con respecto de esta parte de la propuesta inicial ???
=====
Post by Héctor Miguel
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...
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.
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.
v***@gmail.com
2016-08-24 03:20:55 UTC
Permalink
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.
Post by v***@gmail.com
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
y... con respecto de esta parte de la propuesta inicial ???
=====
Post by Héctor Miguel
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...
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.
Espero que aún sigan leyendo este artículo.......
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub
En la secuencia de comandos de la página.
Gracias.
Juan Jose Mora Rocha
2022-11-03 02:12:33 UTC
Permalink
Post by v***@gmail.com
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.
Post by v***@gmail.com
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
y... con respecto de esta parte de la propuesta inicial ???
=====
Post by Héctor Miguel
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...
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.
Espero que aún sigan leyendo este artículo.......
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub
En la secuencia de comandos de la página.
Gracias.
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
2023-10-13 21:48:27 UTC
Permalink
Post by Juan Jose Mora Rocha
Post by v***@gmail.com
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.
Post by v***@gmail.com
Post by Héctor Miguel
hola, Manuel !
Post by Héctor Miguel
cond1: =fila()=celda("row")
cond2: =columna()=celda("col")
Yo uso el office en ingles, por lo que seria
Post by Héctor Miguel
cond1: =row()=cell("row")
cond2: =col()=cell("col")
y... con respecto de esta parte de la propuesta inicial ???
=====
Post by Héctor Miguel
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...
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.
Espero que aún sigan leyendo este artículo.......
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("a1").Calculate
End Sub
En la secuencia de comandos de la página.
Gracias.
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")
}
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

s***@gmail.com
2012-10-04 16:57:24 UTC
Permalink
Post by Manuel
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
Continúe leyendo en narkive:
Loading...