|
|
#2
02-13-2016, 09:17 AM
|
|||
|
|||
This code should add a black background
Code:
Sub blackBack() Dim osld As Slide For Each osld In ActivePresentation.Slides osld.FollowMasterBackground = False osld.Background.Fill.Solid osld.Background.Fill.ForeColor.RGB = vbBlack Next osld End Sub 
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Colour code mail merge header table cell backgrounds
|
ScotsMaverick | Mail Merge | 25 | 11-04-2021 02:07 PM |
|
Convert a word document in an empty one with backgrounds
|
Esgrimidor | Word VBA | 11 | 12-03-2012 03:44 PM |
| How to "print" backgrounds to PDF | randy.pare | Drawing and Graphics | 0 | 12-09-2010 12:05 PM |
|
Code for Changing Cell Backgrounds
|
leroytrolley | Excel | 2 | 12-05-2008 02:05 AM |
|
Question concerning Backgrounds and fading.
|
NYCorBUST | PowerPoint | 2 | 12-29-2005 09:05 AM |
Windows 7 64bit 
Office 2010 32bit
Threaded Mode