title: MS Word 2013 Form, create a Save as and Submit Button with macro
body: <p>I have a simple form (from a template) in Word 2013 and have a 'Submit' button that will:<br>
  1. Gather information from fields in the document, name the document, and saveAs.<br>
  2. Email the form to pre-set email addresses.  </p>
  
  <p>Multiple people will open a document from the template</p>
  
  <pre><code>Private Sub CommandButton21_Click()
  Dim OL              As Object
  Dim EmailItem       As Object
  Dim Doc             As Document
  Dim strTagNum As String, strNTID As String, strDate As String
  
  strTagNum = ActiveDocument.SelectContentControlsByTitle("TagNum")(1).Range.Text
  strNTID = ActiveDocument.SelectContentControlsByTitle("NTID")(1).Range.Text
  strDate = ActiveDocument.SelectContentControlsByTitle("Date")(1).Range.Text
  Dim strFilename As String
  strFilename = strTagNum &amp; "_" &amp; strNTID &amp; "_" &amp; Format(strDate, "ddmmyyyy") &amp; ".docx"
  StrPath = "V:\OPS\Central\Shared\ARM\ALERT"
  
  Application.ScreenUpdating = False
  Set OL = CreateObject("Outlook.Application")
  Set EmailItem = OL.CreateItem(olMailItem)
  Set Doc = ActiveDocument
  
  Doc.SaveAs2 strFilename
  
  
  With EmailItem
  .Subject = "CGF ARM - ALERT ADD/DROP/CHANGE"
  .Body = "Please Review this Alert for Continuous Improvement"
  .To = "john.doe@example.com"
  .Importance = olImportanceNormal
  .Attachments.Add Doc.FullName
  .Send
  End With
  
  Application.ScreenUpdating = True
  
  MsgBox "Alert Record Submitted"
  
  Set Doc = Nothing
  Set OL = Nothing
  Set EmailItem = Nothing
  
  
  End Sub
  </code></pre>
  
  <p>(Credit to Neil Malek at knacktraining.com)<br>
  and this topic<br>
  <a href="https://stackoverflow.com/questions/32047917/microsoft-word-2013-macro-save-file-name-from-form-content?answertab=votes#tab-top">Microsoft Word 2013 macro save file name from form content</a></p>
  
  <p>My questions are:<br>
  1. How do I specify the filepath for the saveAs?  I have the code in the Macro but the document is being saved in the individual users' Documents folder.</p>
  
  <ol start="2">
  <li>How to I tell the Macro to pull the username from the form and send it to "username"@example.com?</li>
  </ol>
  
  <p>The rest of the macro works, when the 'Submit' button is pushed, the document is renamed, saved, and sent as an email to pre-set email addresses.</p>
  
  <p>I've updated this from the original question, I was able to answer some of my prevous questions through trial and error.</p>
  
  <p>Thank you for your time.</p>