![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
24/08/2007, 14:35
|
![Avatar de abrahamvj](http://static.forosdelweb.com/customavatars/avatar144758_1.gif) | | | Fecha de Ingreso: julio-2006 Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 18 años, 6 meses Puntos: 18 | |
Re: Como cambio los colores predeterminados de excel? Sip, mira esto que hice con la grabadora de macros. Es un pie 3D, con 2 zonas, una roja (3) y un azul (5):
Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 24/08/2007 por Abraham
'
'
Charts.Add
ActiveChart.ChartType = xl3DPie
ActiveChart.SetSourceData Source:=Sheets("Hoja2").Range("C5:D6"), PlotBy:= _
xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="Hoja2"
ActiveChart.HasTitle = False
ActiveChart.SeriesCollection(1).Select
ActiveChart.SeriesCollection(1).Points(1).Select
With Selection.Interior
.ColorIndex = 5
.Pattern = xlSolid
End With
ActiveChart.SeriesCollection(1).Points(2).Select
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
End Sub
Cada vez que active esta macro, se creara un pie con los mismos colores
Abraham |