Si está creando archivos nuevos:

Si está creando archivos nuevos:

Estoy trabajando en una hoja de cálculo que se creó en una versión anterior de Excel (creo que 2003) y haceextensoUso de códigos de colores para la organización. Desafortunadamente, se creó utilizando la combinación de colores de la versión anterior y básicamente ninguno de los colores coincide con los del tema de 2010 (excepto el blanco puro y el negro puro). Entonces, cada vez que quiero hacer que algo se ajuste al esquema de color previamente existente, tengo que elegir un color personalizado y seleccionarlo a mano, o tengo que copiar el formato de una celda existente y pegarlo en la celda de destino (que es molesto porque también copia cosas como bordes, etc.)

Encontré la configuración Diseño de página/Temas/Colores, pero parece que todo lo que puedo hacer allí es cambiar los colores seleccionables a uno de sus ajustes preestablecidos o crear una paleta completamente nueva, y solo puedo seleccionar algunos colores en esa configuración. paleta, no el conjunto completo. Crea el resto haciendo versiones más claras o más oscuras de los colores que elijas. Además, hacer cualquiera de estas cosas cambiará los colores ya utilizados en la hoja de cálculo si y sólo si coinciden exactamente con los colores utilizados en el esquema anterior. Esto significa que las cosas que solían estar coloreadas en tonos similares para indicar su relación ahora tienen colores diferentes, algunas permanecen en el esquema antiguo y otras cambian automáticamente al nuevo. Básicamente rompe todo el sistema.

Lo que quiero es poder agregar los colores específicos que uso del documento anterior para que aparezcan en el selector de color y no tenga que buscarlos. Las versiones anteriores de Excel tenían esta capacidad: había un montón de cuadrados personalizables que podías hacer del color que quisieras y se guardaban con el tema. Creo que incluso se podrían agregar más cuadrados, lo olvido. (Ya no tengo instalada la versión anterior). ¿Eliminaron esta función en favor de sus "Temas"? ¿O está escondido en alguna parte? No estoy en absoluto interesado en esta función de combinación de colores. Sólo quiero usar los colores que quiero usar (particularmente los que coinciden con este documento) sin tener que preocuparme si coinciden con alguna paleta preestablecida arbitraria o no. Realmente preferiría no tener que volver a colorear toda esta hoja usando la nueva configuración de esquemas solo para poder mantener un nivel de coherencia aquí.

Respuesta1

Hmm, me temo que no tienes suerte.

En Excel 2003, había una paleta de colores con 40 colores personalizables para uso en hojas de cálculo y 16 colores adicionales para uso en gráficos. La configuración de la paleta predeterminada se puede personalizar y cambiar con el archivo, los colores del gráfico se pueden usar en las celdas de la hoja de trabajo y viceversa.

ingrese la descripción de la imagen aquí

A partir de Office 2007, este principio fue reemplazado por el color "tema", que consta de dos colores de texto y seis colores de acento y diferentes intensidades de estos para elegir. Los temas son consistentes en todas las aplicaciones de Office. Es bastante fácil cambiar entre temas y los elementos que han sido formateados con colores de tema cambiarán cuando se cambie el tema.

También es bastante fácil crear un nuevo tema con tus opciones de color favoritas, si no superan los 6 colores de acento.

Siempre existe la posibilidad de desviarse de los colores del tema y elegir un color personalizado, de la paleta de 127 colores estándar y varios tonos de gris, o definiendo colores personalizados con valores RGB o HSL. Desafortunadamente, no existe una manera fácil de agregar una selección personalizada de este tipo a la paleta estándar.

Qué esextremadamenteSin embargo, lo difícil es definir su paleta de colores personalizada con más de dos colores de texto y 6 colores de acento, es decir, algo similar a los 56 colores que ofrecía Excel antes de la versión 2007.

¿Sabías que Excel tiene estilos, al igual que Word? Los estilos de Excel pueden incluir fuente, tamaño de fuente, formato de números, color de texto y color de relleno. Puede utilizar la función de estilos de Excel y crear diferentes estilos con exactamente el color y otro formato que desee para una celda.

Otra forma (aunque no es fácil y requiere un poco de trabajo) sería crear una nueva hoja, usar dos cuadrículas de 8 columnas por 7 filas y configurar manualmente el color de cada celda con los valores RGB como tiene el archivo original de Excel 2003. Utilice una de las cuadrículas para el color de relleno, una de las cuadrículas para el color del texto. Luego puede seleccionar una celda con el color deseado, copiarla y pegar su formato en la celda de destino.

O copie y pegue cada uno de los distintos formatos de celda en una especie de tabla de guía de estilo en una hoja nueva y utilícela para copiar y pegar formatos únicamente.

Sin embargo, en última instancia, querrás cambiar tu forma de pensar hacia el principio de los temas. Los 56 colores individuales han desaparecido de la interfaz de usuario desde Office 2007. En cambio, los esquemas de color tono sobre tono están de moda, con tonos de seis colores de acento.

Si empiezas a diseñar nuevas hojas de cálculo siguiendo estos lineamientos, tu vida será más fácil a largo plazo.

Respuesta2

Podrías intentar usar (o adaptar) estohoja de cálculo publicada por John Walkenbach. Esta técnica creará un botón en la cinta y le brindará una paleta de colores de Excel 2003.

ingrese la descripción de la imagen aquí

  1. Descargue el libro de trabajo de muestraColorPicker.xls
  2. Pruebe el botón etiquetadoHaga clic aquí para cambiar el color de fondo de las celdas seleccionadas

    Selector de colores de J-Walk

  3. Guarde el archivo en algún lugar.
  4. Haga clic derecho en cualquier lugar de la cinta y seleccionePersonaliza la cinta.
  5. Desde elElija comandos deseleccione en el menú desplegable Macrosy luego seleccione ...GetAColor2a continuación (resaltado en amarillo en la captura de pantalla).

    ingrese la descripción de la imagen aquí

  6. En el panel de la derecha, haga clic enHogarluego seleccioneNuevo grupo. Haga clic derecho en elNuevo grupo (personalizado)opción que aparece, cámbiele el nombre 2003 Coloursy seleccione el icono de relleno.

    ingrese la descripción de la imagen aquí

  7. Finalmente haga clic enAñadir >>botón en el centro. Cambie el nombre de la nueva opción 2003 Coloursy seleccione el ícono de relleno nuevamente. Ahora deberías poder verlo en la cinta.

    ingrese la descripción de la imagen aquí

  8. Es posible que prefiera mover el VBA de este archivo a su libro personal para no abrir un archivo externo al hacer clic en el botón, o tal vez usar un método abreviado de teclado en lugar de un botón de cinta. Pero como forma rápida de ponerlo en marcha, esto funciona bien.

Nota -Más información sobre cómo adaptar el libro de trabajo de J-Walk aquí.

Respuesta3

Esta solución funcionó para mí en Excel 2013, por lo que la publico aquí para cualquiera que se encuentre con esta pregunta en el futuro y no le guste la respuesta "no puedes".


Si está creando archivos nuevos:

Cree una nueva plantilla que Excel utilizará cada vez que cree nuevos archivos.

  1. Abrir un libro en blanco
  2. Personalícelo como desee (todos los libros nuevos futuros serán una copia de este, así que tómese su tiempo para establecer la configuración de fuente deseada, el ancho de columna, lo que sea)
  3. Para cada uno de los colores personalizados que desea guardar, configure una celda para ese color personalizado. (Solo lo usé A1una y otra vez)
  4. Vuelve a configurar todas tus celdas en Sin relleno
  5. Ahora que tiene los colores que desea mostrar en Colores recientes, puede guardar la plantilla.
  6. Guarde el archivo como "Book.xltx" en la carpeta de inicio de Excel. Para mí, esto fue
    C:\users\{username}\AppData\Roaming\Microsoft\Excel\XLSTART\
  7. Cierre el archivo porque no le permitirá abrir un archivo nuevo basado en la plantilla mientras la plantilla aún esté abierta.
  8. Abra un nuevo archivo para ver si funcionó.

Cuando llegué al paso 8, mi nuevo archivo tenía las opciones de color que se muestran a continuación:

Colores


Si está editando archivos antiguos:

Automatice el paso 3 anterior usando VBA.

  1. Guarde el VBA a continuación en sulibro de macros personal
  2. Edite la ColorListvariable para que sea una lista de los valores RGB que necesita
  3. Edite los tiempos de sueño si es necesario para su configuración particular
  4. Agrega la macro a tu cinta

(Si esos enlaces se pudren, los problemas son lo suficientemente comunes como para que puedas encontrar una gran cantidad de ayuda a través de tu motor de búsqueda web preferido).

 

'Declare Sleep() API
  #If VBA7 Then ' Excel 2010 or later
    Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr)
  #Else ' Excel 2007 or earlier
    Public Declare Sub Sleep Lib "kernel32" (ByVal Milliseconds As Long)
  #End If

Sub LoadRecentColors()
'PURPOSE: Use A List Of RGB Codes To Load Colors Into Recent Colors Section of Color Palette
'SOURCE: www.TheSpreadsheetGuru.com/the-code-vault

Dim ColorList As Variant
Dim CurrentFill As Variant

'Array List of RGB Color Codes to Add To Recent Colors Section (Max 10)
  ColorList = Array("066,174,093", "184,055,038", "046,062,081", "056,160,133")

'Store ActiveCell's Fill Color (if applicable)
  If ActiveCell.Interior.ColorIndex <> xlNone Then CurrentFill = ActiveCell.Interior.Color

'Optimize Code
  Application.ScreenUpdating = False

'Loop Through List Of RGB Codes And Add To Recent Colors
  For x = LBound(ColorList) To UBound(ColorList)
    ActiveCell.Interior.Color = RGB(Left(ColorList(x), 3), Mid(ColorList(x), 5, 3), Right(ColorList(x), 3))
    DoEvents
    SendKeys "%h"
    Sleep 500 'Pause half-second (units in milliseconds)
    SendKeys "h"
    Sleep 500 'Pause half-second (units in milliseconds)
    SendKeys "m"
    Sleep 500 'Pause half-second (units in milliseconds)
    SendKeys "~"
    Sleep 500 'Pause half-second (units in milliseconds)
    DoEvents
  Next x

'Return ActiveCell Original Fill Color
  If CurrentFill = Empty Then
    ActiveCell.Interior.ColorIndex = xlNone
  Else
    ActiveCell.Interior.Color = currentColor
  End If

End Sub

Fuente original para VBA

información relacionada