title: in VBA powerpoint How to add a new slide to an empty presentation
body: <p>I want to add a new slide to an empty presentation. I am struggling with the layout.
  I am Using the following:</p>
  
  <pre><code>Set pptLayout = ActivePresentation.Designs(1).SlideMaster.CustomLayouts(1)
  Set sld = ActivePresentation.Slides.AddSlide(1, pptLayout)
  sld.Design = ActivePresentation.Designs(1)
  </code></pre>
  
  <p>This code works fine when i already have a slide in my presentation, but i don't!</p>
  
  <p>So, my question is: how can i insert a slide if i don't have a preexisting slide to set the layout from it?
  I mean in the first line of the code i am defining a layout using slide 1 in order to use it in the .AddSlide</p>