Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
Applies a theme or design template to the specified range of slides.
Syntax
expression. ApplyTheme( _themeName_ )
expression A variable that represents a SlideRange object.
Parameters
| Name | Required/Optional | Data type | Description |
|---|---|---|---|
| themeName | Required | String | The path and name of the theme file (.thmx) or design template file (.pot) to apply to the SlideRange object. |
Example
This example applies a saved theme to the specified range of slides:
ActivePresentation.Slides.Range(Array(1, 3)).ApplyTheme "C:\Program Files\Microsoft Office\Templates\MyTheme.thmx"
This example applies a saved design template to the specified range of slides:
ActivePresentation.Slides.Range(Array(1, 3)).ApplyTheme "C:\Program Files\Microsoft Office\Templates\MyTheme.pot"
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.