İpucu: Diğer diller Google Çeviri'dir. Ziyaret edebilirsiniz English Bu linkin sürümü.
Oturum aç
x
or
x
x
Şimdi Kayıt Olun
x

or

Outlook'ta gönderdiğiniz tüm e-postaları otomatik olarak bcc nasıl?

Bir e-posta mesajı gönderirken kalıcı bir gizli alıcınız varsa ve diğer alıcıların kendi adresini görmesini istemiyorsanız, bcc işlevini kullanmalısınız. Ancak bcc'ye ihtiyacımız olduğunda, bcc alanını manuel olarak göstermek ve onun için bir kişi seçmek zorundayız. Bu manuel işlemlerden kaçınmak için aşağıdaki makale, gönderdiğiniz tüm e-postalardaki bir e-posta adresini otomatik olarak görmek üzere görünümün nasıl değiştirileceğini gösterecektir.

VBA'yı kullanarak Outlook'ta varsayılan otomatik bcc

Outlook için Kutools'ı Outlook'ta kullanarak otomatik bcc

Outlook'taki belirli alıcılara (kendim) gönderilen her e-postanın Otomatik Başvuru veya Gizli iletileri

Outlook için Kutools tarafından sağlanan Auto CC / BCC özelliği. 60 günlük ücretsiz deneme sürümü için sınırlama olmaksızın tıklayın!
kendime otomatik cc

Kutools for Outlook: 100 + Yeni Gelişmiş Araçlar Outlook için.
Office Tab: Sekmeli Düzenlemeyi ve Office'te Taramayı Etkinleştirme, Sadece Chrome, Firefox, IE 8 / 9 / 10 gibi.
Klasik Menü: Eski Menüler ve Araç Çubuklarını Geri Getirin 2007, 2010, 2013, 2016 ve 2019.

arrow mavi sağ balon VBA'yı kullanarak görünümdeki varsayılan otomatik bcc

Outlook'ta otomatik Bcc kuralını yapılandırmak için aşağıdaki VBA kodunu uygulayabilirsiniz. Lütfen şu şekilde yapın:

1. basın diğer + F11 Microsoft Visual Basic for Applications penceresini açmak için aynı anda tuşlarını kullanın.

2. Çift tıklayın ThisOutlookSessionProje bölmesinde açın ve açılış penceresine VBA kodunun altına yapıştırın. Aşağıdaki ekran görüntüsüne bakın:

VBA kodu: Tüm e-postaları gönderirken Otomatik bcc

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objRecip As Recipient
    Dim strMsg As String
    Dim res As Integer
    Dim strBcc As String
    On Error Resume Next
    
    ' #### USER OPTIONS ####
    ' address for Bcc -- must be SMTP address or resolvable
    ' to a name in the address book
    strBcc = "SomeEmailAddress@domain.com"
    
    Set objRecip = Item.Recipients.Add(strBcc)
    objRecip.Type = olBCC
    If Not objRecip.Resolve Then
        strMsg = "Could not resolve the Bcc recipient. " & _
                 "Do you want still to send the message?"
        res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
                 "Could Not Resolve Bcc Recipient")
        If res = vbNo Then
            Cancel = True
        End If
    End If
    
    Set objRecip = Nothing
End Sub

Not: Lütfen "SomeEmailAddress@domain.com" Yukarıdaki kodda bcc'ye gönderilecek e-posta adresiniz bulunur.

3. VBA kodunu kaydedin ve Microsoft Visual Basic for Applications penceresini kapatın.

Şu andan itibaren, Bcc alanındaki adresi doldurmanız gerekmiyor. Görünümünüzden bir e-posta gönderdiğinizde, VBA kodu yürütüldüğünde otomatik olarak istediğiniz alıcıya göz atacaktır.


arrow mavi sağ balon Outlook için Kutools'ı Outlook'ta kullanarak otomatik bcc

Yukarıdaki VBA kodu, yeni başlayanlar için biraz zordur ve zahmetlidir, burada kolay ve hızlı bir araç-Kutools for Outlook Outlook'ta gönderdiğiniz tüm e-postaları veya belirtilen e-postaları otomatik olarak silmenize yardımcı olması için.

Kutools for Outlook - 20'dan fazla kullanışlı Outlook eklentisi ile 60 günde herhangi bir sınırlama olmaksızın ücretsiz olarak çalışın

Kutools for Outlook'u yükledikten sonra, lütfen şu şekilde yapın:

1. tıklayın Kutools > Otomatik CC / BCC > Otomatik CC / BCC'yi etkinleştir (Ya da Otomatik CC / BCC Yöneticisi), ekran görüntüsüne bakın:
doc otomatik bcc kim 1

2. In Otomatik CC / BCC Yöneticisi iletişim kutusunu tıklayın yeni buton. Aşağıdaki ekran görüntüsüne bakın:

3. Otomatik CC / BCC açılışında iletişim kutusundaki lütfen bu yeni Gizli kuralı için bir ad yazın Kural Adı kutusuna gidin ve Tüm gezi e-postaları seçeneği filtre bölümüne tıklayın ve Alıcılar buton. Yukarıdaki ekran görüntüsüne bakın:

4. Sonra bcc'ye eklemek istediğiniz e-posta adresinizi, Bcc -> metin kutusuna gelin veya listeden gizlemek istediğiniz adresi seçin ve listeden Bcc -> düğmesine basarak ilgili alana girin ve OK buton. Aşağıdaki ekran görüntüsüne bakın:

5. Ve şimdi Otomatik CC / BCC iletişim kutusunda, bcc'ye girilmesini istediğiniz belirtilen adres CC / BCC Alıcı Adı kutusunda, lütfen OK düğmesine basarak yapılandırmayı kaydedin. Ve sonra OK Otomatik CC / Gizli Yöneticisi iletişim kutusunda düğmesini tıklayın. Aşağıdaki ekran görüntüsüne bakın:

Şimdiye kadar bcc kuralı oluşturuldu, bir e-posta gönderirken aynı mesaj bcc alıcısına aynı anda gönderilecek ve bu kural Outlook'unuzdaki tüm hesaplara uygulanır.

notlar:
(1) Bu işlevle, her zaman CC kuralları da.
(2) Bu aracı kullanarak ihtiyacınıza göre birden fazla kural oluşturabilirsiniz.
(3) Kuralları kapatmak isterseniz, Otomatik CC / BCC'yi etkinleştir, ve tüm kurallar işe yaramaz. Ayrıca, içindeki kural adının işaretini kaldırabilirsiniz. Otomatik CC / BCC Yöneticisi Bazı belirlenmiş kuralları devre dışı bırakmak için iletişim kutusu.


arrow mavi sağ balonDemo: Outlook için Kutools ile otomatik bcc

Bahşiş: Bu videoda, Kutools sekmesi tarafından eklenir Kutools for Outlook. İhtiyacınız olursa, lütfen tıklayın Districts Cüzdan Sınırlı olmaksızın 60 günlük ücretsiz denemeniz olsun!


arrow mavi sağ balonİlgili makale:

Otomatik olarak kendimi her zaman Outlook'ta nasıl cc?



Kutools for Outlook

Outlook için 100'ten Fazla Gelişmiş İşlevler 2010, 2013, 2016, 2019 ve 365

Banner 201812 için minik görünüm için ekran görüntüsü kutools

Diğer Özellikler | Bedava indir | Yüzlerce işlev için yalnızca $ 39.00

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Shahriar · 4 years ago
    hi,
    thanx its work nicely
    but my question is how can i use this auto BCC for multiple email, here you showed for only one email bcc, can i use this for multiple mail ?? if i can than how ?
  • To post as a guest, your comment is unpublished.
    SupremeAC · 4 years ago
    Hi there and thank you for the code. Works perfectly for me in Outlook 2013. I was wondering if there is a way to have it also work when replying to other people's mails. It seems to only work when I send a 'new' mail to someone?
  • To post as a guest, your comment is unpublished.
    Tony_Warren · 4 years ago
    Thanks.

    The autobcc works like a treat.
  • To post as a guest, your comment is unpublished.
    Kevin_Black · 4 years ago
    Hi There, I cannot get the code to work in Office2013.
    From the tools>>references menu do I need to activate any specific libraries?

    Thanks
    Kevin
  • To post as a guest, your comment is unpublished.
    Shep · 4 years ago
    Great post - really helped, the only problem is the bcc doesn't run when the mail isn't created from within Outlook - eg you right-click on a file from the desktop, send to, mailrecipient, or you click on the email file icon from within a program, and it doesn't bcc - can anyone help ?

    I also slightly modified the code, so that Outlook gives you choice whether or not to bcc the recipient.

    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objRecip As Recipient
    Dim strMsg As String
    Dim res As Integer
    Dim strBcc As String
    Dim intresponse As Integer
    On Error Resume Next

    intresponse = MsgBox("Click Yes to share this email with QA, click No to keep it private", _
    vbYesNo + vbQuestion, _
    "Email Privacy")
    If intresponse = vbYes Then


    strBcc = "recipient@email.com"
    Set objRecip = Item.Recipients.Add(strBcc)
    objRecip.Type = olBCC

    If Not objRecip.Resolve Then
    strMsg = "Could not resolve the Bcc recipient. " & _
    "Do you want still to send the message?"
    res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
    "Could Not Resolve Bcc Recipient")
    If res = vbNo Then
    Cancel = True
    End If



    End If

    End If



    End Sub