Cómo colorear líneas alternas en Excel

Índice
  1. Cómo NO aplicar colores alternos a las filas
  2. Cómo aplicar filas de colores alternos usando formato condicional
  3. Automatizar con VBA

Hace un par de semanas nos estábamos preparando para una presentación. Gran parte de la presentación se construye a partir de hojas de cálculo de Excel vinculadas a PowerPoint . Esta técnica es excelente porque la presentación se actualiza automáticamente cada vez que cambian las hojas de cálculo de Excel. En la presentación, también hay algunas tablas de PowerPoint con el diseño de rayas azules predeterminado.

Formato de tabla rayada de PowerPoint.

Luego vinieron las palabras que temía escuchar: “¿Puedes hacer todas las tablas de la presentación en el mismo formato con las franjas alternas?”.

Cómo NO aplicar colores alternos a las filas

Yo había estado en una situación similar anteriormente. Había pasado horas formateando cada línea para alternar colores. Luego, sería necesario agregar una nueva línea en el medio o reordenar las filas. Arrrrggghhh!!!! Entonces el formato no se alternaría, por lo que tendría que volver a revisarlo y comenzar a alternar los colores nuevamente.

Luego, una vez que terminé, noté que los colores no eran exactamente del mismo tono que los de PowerPoint, eran similares, pero no iguales. Así que sólo tenía una opción: tenía que volver atrás y hacerlo todo de nuevo. . . Arrrrggghhh!!!!

Si alguna vez te encuentras en esta situación, no lo hagas de esta manera; sólo estarás desperdiciando tu vida si tienes que hacerlo una y otra vez.

Cómo aplicar filas de colores alternos usando formato condicional

En primer lugar, averigüe los colores exactos que desea aplicar. Descubra los valores de color RGB (rojo, verde, azul) exactos y anótelos; querrá aplicarlos al aplicar el formato condicional.

Para aplicar los colores a filas alternas usaremos formato condicional combinado con las funciones FILA y MOD:

FILA: proporciona el número de fila de la celda.

MOD: proporciona el resto de una división (por ejemplo, MOD(5,2) proporciona un resultado de 1, porque 5 cabe en 2 dos veces, con un resto de 1).

Los números de FILA siempre serán un número impar y luego un número par. Como resultado, el valor MOD de FILA es siempre 0 para filas pares y 1 para filas impares.

Ahora estamos listos para aplicar esta función con formato condicional. Seleccione las celdas a las que desea aplicar el formato condicional. Luego haga clic

Inicio – Estilos – Formato condicional – Nueva regla

Captura de pantalla, Inicio, Formato condicional, Nueva regla

Seleccione Usar una fórmula para determinar qué celdas formatear

En el cuadro Formatear valores donde esta fórmula es verdadera, ingrese la siguiente fórmula:

=MOD(FILA()) = 1

Captura de pantalla de la fórmula para alternar colores.

Haga clic en el botón Formato y establezca el formato requerido. Aquí es donde puedes utilizar los códigos de color RGB exactos.

Color personalizado de captura de pantalla

Para imitar el aspecto de Powerpoint, agregue también un borde blanco.

Si necesita colores para las otras filas, vuelva a realizar el mismo proceso, pero cambie la fórmula para que sea:

=MOD(FILA(),2) = 0

Asegúrate de aplicar un color diferente para que parezca rayado.

Automatizar con VBA

Esto me pareció mucho trabajo, especialmente porque tenía muchas hojas de trabajo que formatear. Pero podría automatizar esto aplicando el formato usando VBA (de hecho, usé Macro Recorder para esto, luego edité el código, simplemente parecía más rápido). Incluso inserté un botón en mi libro de macros personales, para que esté disponible en cualquier momento que lo necesite.

Sub StripeyPresentation()Dim Rng As RangeSet Rng = SelectionWith Rng.FormatConditions.Add(Type:=xlExpression, Formula1:="=MOD(ROW(),2)=0") .Interior.Color = RGB(208, 216, 232) .Borders.LineStyle = xlContinuous .Borders.ThemeColor = 1 .Borders.Weight = xlThinEnd WithWith Rng.FormatConditions.Add(Type:=xlExpression, Formula1:="=MOD(ROW(),2)=1") . Interior.Color = RGB(233, 237, 244) .Borders.LineStyle = xlContinuous .Borders.ThemeColor = 1 .Borders.Weight = xlThinEnd WithEnd Sub

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Subir

Este sitio web utiliza cookies para mejorar la experiencia del usuario y garantizar un funcionamiento eficiente. Al utilizar nuestro sitio web, aceptas todas las cookies de acuerdo con nuestra política de cookies. Leer mas...