![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
24/08/2007, 14:56
|
![Avatar de sebas1985](http://static.forosdelweb.com/customavatars/avatar98787_1.gif) | | | Fecha de Ingreso: abril-2005 Ubicación: Bs. As. Capital - Resistencia en el CORAZON
Mensajes: 296
Antigüedad: 19 años, 9 meses Puntos: 0 | |
Re: Como cambio los colores predeterminados de excel? Cita:
Iniciado por abrahamvj 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 MUCHISIMAS GRACIAS LO PROBARE EN LA SEMANA QUE VIENE Y TE COMENTO.
GRACIAS DE NUEVO |