title: VBA code for adding todays date in the sbject while sending email
body: <p>I have copied the VBA Code for sending status update mail form the selected cells in excel.
  But now I wanted to change the code to add todays date in to the code so while sending status mail it will pick todays date in the subject and in introduction section. Below is the code</p>
  
  <pre><code>Sub Send_Range()
        ActiveSheet.Range("A1:B5").Select
        ActiveWorkbook.EnvelopeVisible = True
        With ActiveSheet.MailEnvelope
        .Introduction = "This is a sample worksheet."
        .Item.To = "E-Mail_Address_Here"
        .Item.Subject = "My subject"
        .Item.Send
     End With
  End Sub
  </code></pre>
  
  <p>Please help</p>