Gráficos de Excel: ¿Cómo aplico un formato de plantilla de gráfico?


2

He creado un formato que me gusta. ¡Ahora necesito aplicar este formato a más de 900 gráficos! He visto que podemos guardar un formato como plantilla para uso futuro, sin embargo, no puedo encontrar el lugar donde tenga la opción de aplicar dicha plantilla.

¿Cuál es el proceso para aplicar una plantilla hecha por el usuario en Excel 2007?

Respuestas:


2

Puede copiar y pegar formatos de gráficos. En 2003 y versiones anteriores, copie el gráfico y luego use Edit>Paste Special Para pegar solo los formatos. No tengo idea del control de cinta equivalente en 2007/2010. Me temo, pero estoy razonablemente seguro de que debería estar allí (MS eliminó algunas funciones de gráficos en 2007).

Sin embargo, con 900 gráficos, incluso esto puede ser un poco molesto. Podrías usar un poco de VBA para lograr lo mismo.

Editar : Tuvo un poco de juego y esto copiará el formato de Chart1 a todos los otros gráficos en la hoja de trabajo:

Sub ReplicateChartFormats()
    Dim c As ChartObject

    ActiveSheet.ChartObjects("Chart 1").Activate
    ActiveChart.ChartArea.Copy

    For Each c In ActiveSheet.ChartObjects
        With c.Chart
            .Paste Type:=xlFormats
        End With
    Next c
End Sub

Nuevamente, tenga en cuenta que esto solo se ha probado en Excel 2003 y al modelo de objetos en 2007 le faltan algunas cosas en comparación con versiones anteriores, pero esto es algo fundamental, por lo que debería funcionar.


Gracias. Voy a echar un vistazo a la pasta especial (tonto de mi parte no mirar eso primero en realidad). En cuanto a VBA, soy un principiante de VBA, por lo que no podría intentar ese tipo de codificación todavía.
RocketGoal

No soy Jon Peltier y mi gráfico de VBA twiddling-fu es débil, así que tendré que transmitir un ejemplo de VBA. Lo siento :(
Lunatik

Parece que me he nivelado un poco cuando me las arreglé para conseguir algo improvisado :)
Lunatik

Copiar y pegar un encanto trabajado. Daré una oportunidad al código VBA anterior, ya que me ahorrará aún más tiempo. Gracias de nuevo por su tiempo y consejos.
RocketGoal

Al usar nuestro sitio, usted reconoce que ha leído y comprende nuestra Política de Cookies y Política de Privacidad.
Licensed under cc by-sa 3.0 with attribution required.