Saber color celda, sin macros.

[Antonio Cardaldas]

Hola a todos. Felices Fiestas.
Tengo un problemilla (que adjunto Planing anual.xlsx).
Os digo como quisiera que funcionase mi programa.
El color del relleno de celda de cada evento (que pondría manualmente) debe hacer cambiar al mismo relleno F. INICIO y F, FIN; y los de las celdas de la misma fila entre las dos fechas (que ahora lo hago con formato condicional).

Buscando por internet encontré esto que creo que me ayudará:

Asumiendo Excel 2007 en inglés (que es el que uso), ve a la pestaña Formulas/Define Name y en la ventana que aparece en el campo Name dale un nombre, como por ejemplo "color". En el campo Refers to escribe la siguiente fórmula: =GET.CELL(63,OFFSET(INDIRECT("RC",FALSE),0,-1)). Luego presionas el OK.

Ahora en la Hoja si la celda a la que quieres determinar el color está en la celda A1, en la celda a la derecha, o sea B1, escribe la formula =color. Luego de dar ENTER debería de aparecer el código del color de la celda.

Bueno, ahora puedes usar esta nueva 'función personalizada' para determinar el código de cualquier color de celda.

Yo uso Excel 2016 en español y esta fórmula me da error. La quise traducir pero siempre me da error (o no encuentro los modificadores adecuados).

Bueno, a ver si alguno me echa un cabo.
Gracias.
 

[Antonio Cardaldas]

hace 11 minutos , Antonio Cardaldas dijo:

Parece que no se anexó el archivo, aunque lo intenté. Si no lo podéis descargar decídmelo, que lo vuelvo a intentar.
 

 

[Israel Cassales]

Hi

Intenta usarla de esta forma [Cambiar la coma, por el punto y coma] según tu separador.

=INDICAR.CELDA(63,Hoja1!$A1)+AHORA()*0

Eso te dará el color de relleno, aún así debes guardar el libro habilitado para macros.

Saludines

[DiegoPC]

Hola

La solución brindada por Israel no utiliza macros, sino las antiguas funciones de macro (o macrofunciones) que requieren  ser guardadas en un libro habilitado para macros. Siendo así ¿Por qué la limitación de evitar las macros?

[Abraham Valencia]

Por si a alguien le quedaron las dudas acerca de qué fue lo que se usó: https://abrahamexcel.blogspot.com/2022/05/excel-e-historia-i-excel-macro-language.html

Saludos.

[Antonio Cardaldas]

En 2/1/2023 at 5:17 , Abraham Valencia dijo:

Por si a alguien le quedaron las dudas acerca de qué fue lo que se usó: https://abrahamexcel.blogspot.com/2022/05/excel-e-historia-i-excel-macro-language.html

Saludos.

Buen resumen, si señor. Muchas gracias.

[Antonio Cardaldas]

En 30/12/2022 at 19:41 , DiegoPC dijo:

Hola

La solución brindada por Israel no utiliza macros, sino las antiguas funciones de macro (o macrofunciones) que requieren  ser guardadas en un libro habilitado para macros. Siendo así ¿Por qué la limitación de evitar las macros?

Hola DiegoPC. Es cierto lo que dices de las macros, se que lo de usar formulas reduce las posibilidades de Excel, pero siempre que las usé (muy básicas) tuve problemas en la distribución de los archivos. Seguro que algo haría mal, pero es la impresión que me quedó después de usar las macros o BVA. A lo mejor es hora de retomar el tema y sacarle partido. Gracias por tu opinión.

[Antonio Cardaldas]

En 30/12/2022 at 18:16 , Israel Cassales dijo:

Hi

Intenta usarla de esta forma [Cambiar la coma, por el punto y coma] según tu separador.

=INDICAR.CELDA(63,Hoja1!$A1)+AHORA()*0

Eso te dará el color de relleno, aún así debes guardar el libro habilitado para macros.

Saludines

Gracias por tu ayuda. Cuando termine el trabajo colgaré el resultado. Es lo que buscaba y trataré de utilizarlo. Muchas gracias.

[Antonio Cardaldas]

En 30/12/2022 at 18:16 , Israel Cassales dijo:

Hi

Intenta usarla de esta forma [Cambiar la coma, por el punto y coma] según tu separador.

=INDICAR.CELDA(63,Hoja1!$A1)+AHORA()*0

Eso te dará el color de relleno, aún así debes guardar el libro habilitado para macros.

Saludines

Una cosa curiosa sobre tu macrofunción:

Al ordenar las columnas B y C por el valor de C, veo que algunos para algunos colores repite el valor aunque son claramente diferentes (el 10 o el 53).

Curioso.

 

[Israel Cassales]

Hola.

Sí es curioso pero tiene una razón, el INDICAR.CELDA tiene limitantes. Como existe de tiempo atrás y la paleta de colores en un inicio era menor de 60 se le complica las miles de posibilidades que hay ahora de escoger un color.  Otro "defecto" por ejemplo es que no se actualiza tan pronto como cambia el color de la celda, sólo lo hace cuando la celda (o la hoja) se vuelve a calcular con F9 por ejemplo.

Lamento no mencionarlo, aunque lo que trate fue seguir la línea inicial de la solicitud editando un poco la opción que encontraste en Internet.

Si das el paso al VBA obtener el color es más sencillo y exacto, considera que para usar ésta opción de macrofunción debes guardar el libro como habilitado para macros así que en términos simples, no es lo mismo pero es igual.

Saludines.

[Abraham Valencia]

Hola amigos

No olviden que las macros funciones 4.0 no detectan todas las características de formatos que Excel tiene hoy en día. En el caso de INDICAR.CELDA solo detecta 56 colores de registro y estos son los de índice. Adjunto un ejemplo de ellos y que tiene una macro para que vean como los obtuve, ojo, relean el enlace que envié. Cualquier otra dará dilemas como los mencionados. Si necesariamente se van a usar otros colores, a su vez necesariamente se tienen que usar macros de VBA, no hay otra forma y no olvidando, también, que los eventos de los objetos no detectan cambios de formato de forma automática. 

ejemplo macro 4.0.xlsm

[Gerson Pineda]

En definitiva, es mejor VBA

For Each c In selection
    c.Offset(, 1) = c.Interior.Color
Next

Selecciona las celdas con color y aplica este procedimiento