title: VBA Code to Insert Image in Placeholder
body: <p>I am working with VBA for the first time and have created a User Form that includes two drop down menus along with a Command Button. Once the user selects an item from each drop down menu ("Image1" and "Image2" for example) they will then click the command button, which would insert those selected items (which are images that would be pulled from a file on the local computer) inside specific image placeholders that are on the slide.</p>
  
  <p>Any ideas on how I would make this happen? I currently have the form designed, but it has zero functionality. I hope this is clear. Thanks!</p>
  
  <p>--UPDATE--</p>
  
  <p>Here is the VBA code I have so far. The next question is where do I link the files, such as "Ash Fork", to local images on the computer:</p>
  
  <pre><code>Private Sub Combo1_DropButtonClick()
  With Combo1
  
      .AddItem "Ash Fork"
      .AddItem "Flagstaff"
      .AddItem "Winslow"
      .AddItem "Clints Well"
      .AddItem "Bellemont"
  
  End With
  End Sub
  
  Private Sub Combo2_DropButtonClick()
  With Combo2
  
      .AddItem "Ash Fork"
      .AddItem "Flagstaff"
      .AddItem "Winslow"
      .AddItem "Clints Well"
      .AddItem "Bellemont"
  
  End With
  End Sub
  
  Private Sub CommandButton1_Click()
  
  Dim image1 As String
  Dim image2 As String
  
  image1 = Combo1.Text
  image2 = Combo2.Text
  
  ActiveSheet.Shapes.AddPicture FileName:=image1, _
                                linktofile:=msoFalse, _
                                savewithdocument:=msoCTrue, _
                                Left:=0, Top:=0, Width:=100, Height:=100
  
  ActiveSheet.Shapes.AddPicture FileName:=image2, _
                                linktofile:=msoFalse, _
                                savewithdocument:=msoCTrue, _
                                Left:=0, Top:=100, Width:=100, Height:=100
  
  End Sub
  </code></pre>