PPT V2000 Controlling Color Palette 1

[Whatarangi]

I know how to design and apply a colour scheme to a PowerPoint presentation and how to build a Master Template incorporating a specific colour scheem. What I would like to do is build a custom colour palette to control the colours in the remainder of the palette, for example, the colours that are available for Chart lines when customising a chart. Reason: so that users can only choose colours that relate to our logo and not the standard MS Office colour palette. How can this be done? And does it vary from Version 97, to 2000, to 2002 - as I support users in all three versions. Would the solution also apply to Word and Excel?

 

[HalfListener]

Don't do this unless you are really sure you want to.


Option Explicit

Sub AddColorScheme()
With ActivePresentation.ColorSchemes.Add
.Colors(ppBackground).RGB = RGB(0, 0, 255)
.Colors(ppForeground).RGB = RGB(0, 255, 0)
' etc. etc. etc.
End With
End Sub

Sub DeleteAllColorSchemes()
'Takes you down to a single color scheme
Dim x As Integer
With ActivePresentation
For x = .ColorSchemes.Count To 2 Step -1
.ColorSchemes(x).Delete
Next x
End With
End Sub

 

[Whatarangi]

Thank you Half Listener.

Can you please help me one step further. The information you provided allowed me to change the specific areas, such as Accent, Background etc. Is it possible to also change the Main Colour Palette so that when I'm adjusting Chart bar colours in a particular slide, I see a specific set of colours in the main colour palette? Or are the other colours specific to all MS Office applications and therefore not customisable? Cheers Whatarangi