Hi there

I have managed to add the following as a warning before I send emails in Outlook 2016:

HTML Code:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If MsgBox("You are sending a mail. Have you checked your spelling, grammar, and formatting? Have you spelt the recipients name correctly? Do you have the correct recipients? Are you sure you want to send the e-mail?", vbYesNo + vbExclamation + vbApplicationModal + vbMsgBoxSetForeground, "External Mail Alert!") = vbNo Then
        Cancel = True
    End If
End Sub
Two questions:

1) How do I turn off the ping sound when it appears before I send an email?
2) It was working fine yesterday, however today I have booted up and sent an email and the warning didn't appear - How do can keep it on at all times when outlook 2016 is open?