VBA: ppLayoutCustom

tinfanide · #1 03-14-2013, 07:38 AM

Code:

ActivePresentation.Slides.Add 1, ppLayoutCustom

How about if I have two custom layouts?
It only adds the first custom layout.

JohnWilson · #2 03-14-2013, 07:56 AM

Slides.Add is legacy code from 2003. In 2010 you should use Slides.AddSlide

Sub MyLayout()
Dim ocust As CustomLayout
Set ocust = ActivePresentation.SlideMaster.CustomLayouts(2)' change number
ActivePresentation.Slides.AddSlide 1, ocust
End Sub

tinfanide · #3 03-16-2013, 04:23 AM

Quote:

Originally Posted by JohnWilson

Slides.Add is legacy code from 2003. In 2010 you should use Slides.AddSlide

Sub MyLayout()
Dim ocust As CustomLayout
Set ocust = ActivePresentation.SlideMaster.CustomLayouts(2)' change number
ActivePresentation.Slides.AddSlide 1, ocust
End Sub

I got it. It should be somewhere in SlideMaster that is the answer to my doubt.
Many thanks.