Hi All,

I am working as a Unix admin and i will be sending out emails to my onsite departments for server maintenance.What i want to do with Outlook is

If i insert an email ID say in the TO box, can i set in the Outlook to auto-insert my Supervisor email ID say automatically instead of keying in manually.

I search in Google but cannot find any relevant sites. Will be helpful if could advice on the above

Regards
gvan_itm

Dani AI

Generated

@zvan_itm asked how to auto-add a supervisor to CC when sending to a particular address. correctly pointed out third-party add-ins (those are a fine quick fix). Below are alternative, durable options and a small VBA example you can drop into Outlook if you prefer a built-in approach.

Client vs server options (pros/cons)

  • Exchange/Server-side rule (mail flow/transport rule): best for guaranteed enforcement across all mail clients; needs an Exchange admin to create a rule that adds a recipient for messages sent to specific addresses.
  • Outlook client rules / Quick Steps / templates: easy to set up by the user. Client rules that act on sent messages or Quick Steps can add CC/BCC but typically only run when Outlook is running and are manual (Quick Steps) or limited in condition flexibility.
  • Distribution list: include the supervisor in a group address so a single To entry reaches both parties and avoids automatic rewriting.
  • Third-party add-ins: convenient and feature-rich, as noted by , but check corporate policy and trustworthiness.

VBA example (automatic CC when To contains server1@cmp.com)
Paste this into ThisOutlookSession (Alt+F11), save, restart Outlook, and enable macros per your org policy.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim mail As Object, recips As Object, r As Object
    Dim adminAddr As String, checkAddr As String
    Dim i As Long, alreadyAdded As Boolean

    adminAddr = "admin@cmp.com"
    checkAddr = "server1@cmp.com"

    If TypeName(Item) = "MailItem" Then
        Set mail = Item
        If InStr(1, LCase(mail.To & ";" & mail.CC), LCase(checkAddr)) > 0 Then
            alreadyAdded = False
            Set recips = mail.Recipients
            For i = 1 To recips.Count
                If LCase(recips.Item(i).Name) = LCase(adminAddr) Or _
                   LCase(recips.Item(i).Address) = LCase(adminAddr) Then
                    alreadyAdded = True: Exit For
                End If
            Next i
            If Not alreadyAdded Then
                Set r = recips.Add(adminAddr)
                r.Type = 2   ' olCC
                r.Resolve
            End If
        End If
    End If
End Sub

Notes and troubleshooting

  • Macros are blocked by default in many shops; involve IT if needed. Client-side rules/macros require Outlook running; server-side rules do not. Test sending and check Sent Items for duplicates. Choose CC if recipients should see the supervisor; use BCC only for hidden copies and be mindful of privacy/audit implications.

Recommended Answers

All 3 Replies

Hi, I am not here to help you as I need all the help I can get. But why do you need to send yourself a copy of an email you have sent and is in your sent folder??

Bob

First of all I would say it's quite possible he will set up a schedule to auto send the message or send it at a later time. If that happens then he wants to remind himself as well. He may also just want them to see that he sent it and is aware, it may not be generated from his system as servers have the ability to auto send emails with a little work.

This should help you with your problem on the auto CC - it will also do a BCC if you prefer

http://office.microsoft.com/en-us/marketplace/EM100870531033.aspx?CategoryID=CE010719621033


it basically just redirects you to this

http://www.ablebits.com/outlook-blind-carbon-copy-bcc-email-addins/index.php

*If this helps don't forget to mark it solved. :)

Yes it works and as you told its solved.
Thanks

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.