By using you agree to our cookie policy, We and our partners operate globally and use cookies, for multiple purposes


Outlook warning before you send an email

In Outlook press Alt+F11 to go to VBA

+ Project1
--+Microsoft Outlook Objects

Double click "ThisOutlookSession"

In Application Object (left drop-down) ItemSend Procedure (Right drop-down)

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If MsgBox("Proofread email and press Yes to send" & vbCrLf & _
  "1. Don't use pronouns" & vbCrLf & _
  "2. Don't use You" & vbCrLf & _
  "3. Check their vs. there type mistakes" & vbCrLf & _
  "4. Can words be removed?" & vbCrLf & _
  "5. If file attached is it correct, open and check it" & vbCrLf & _
  "6. Does email have a subject?", vbYesNo) = vbYes Then
     Cancel = True
End If

End Sub

blog comments powered by Disqus
Home | About | Feedback| Privacy | Terms of Service | @alecberg | FAQ | | Copyright © 2022 All Rights Reserved. Edit
This site uses cookies. If you don't want cookies and who doesn't want them as they're yummy, then leave.