Alerta antes de enviar um email com um campo Cco em branco

1

Da mesma forma que o Microsoft Outlook exibirá um alerta se você tentar enviar um email com o campo Para deixado em branco ou tentar enviar um convite de calendário com o campo Local em branco, eu quero um alerta que apareça se eu deixou o campo Cco em branco. Alguma idéia de como isso pode ser alcançado?

    
por Gina 18.07.2013 / 18:23

1 resposta

1

coloque este vba no seu módulo thisoutlooksession e ajuste suas configurações de macro adequadamente

Public WithEvents myOlApp As Outlook.Application

Public Sub Initialize_handler()
    Set myOlApp = CreateObject("Outlook.Application")


End Sub

Private Sub myOlApp_ItemSend(ByVal Item As Object, Cancel As Boolean)


Dim prompt As String
prompt = "The BCC Field is empty!"



If Item.BCC = "" Then


    If msgbox(prompt, vbYesNo + vbQuestion, "BCC Field") = vbNo Then
    Cancel = True
    End If
 End If

End Sub
    
por 18.07.2013 / 21:35