Powerpoint: Starting Templates By Using an Add-in
Step 1: create template WalMar.potm
Step 2: Adjust the XML of this template by using Custom UI editor; create a custom UI part like this:
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
<ribbon startFromScratch="false">
<tabs>
<tab id="Templates" label="Templates" insertBeforeMso="TabHome">
<group id="WalMar" label="WalMar">
<button id="TemplatesWalmar" label="Templates Walmar" imageMso="FilePrepareMenu" size="large" onAction="OpenTemplatesWalmar"
/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
The tab will then look like this:
Step 3: Add VBA to WalMar.potm:
Sub OpenTemplatesWalmar ()
Dim oPA As PowerPoint.Application
Dim oPP As PowerPoint.Presentation
Dim strTemplate As String
strTemplate =
"D:\WalMar\Templates\Powerpoint\HouseStyle.ppt" 'As an example
Set oPA = New PowerPoint.Application
oPA.Visible = msoTrue
oPA.Presentations.Open strTemplate,
untitled:=msoTrue
End Sub
Be sure the file HouseStyle.ppt exists at the given location.
Step 4: Save WalMar.potm as an Add-In: WalMar.ppam
Step 5: Save WalMar.ppam at a trusted location
Step 6: Add WalMar.ppam as an Powerpoint add-in
Now every time you start Powerpoint, you will get this new tab called Templates which leads you to the given template.
Reacties