Outlook VBA ile Tüm Kişilerinizin E-posta Görünen Ad Biçimlerini Toplu Şekilde Değiştirme

Görünüm Çözümleri Eylül 29, 2025

Outlook, tüm iletişim e-postalarını varsayılan görünen ad biçiminde, yani “tam ad (e-posta adresi)” olarak gösterecektir. Beğenmezseniz, yeni kişiler oluştururken her seferinde manuel olarak değiştirmeniz gerekecektir. Bu makale, bunları Outlook VBA ile toplu olarak değiştirmenin hızlı bir yolunu öğretecektir.

Yeni bir Outlook kişisi oluşturduğunuzda, tam adı ve e-posta adresini girdikten ve ardından "Farklı göster" kutusuna tıkladıktan sonra, aşağıdaki ekran görüntüsünde gösterildiği gibi varsayılan görünen ad otomatik olarak doldurulacaktır:

Bu e-posta görünen adı, bir kişi seçmeniz gerektiğinde etkili olacaktır. Aşağıdaki resim gibi, 2^nd “Görünen Ad” sütunu, “Görüntü Şekli” alanındaki bilgiye karşılık gelir.

E-posta görünen ad biçimini değiştirmek istediğinizde, manuel olarak değiştirmeniz gerekir. Ancak VBA'nın yardımıyla, tüm kişilerin e-posta görünen adı biçimini istediğiniz biçime toplu olarak değiştirebilirsiniz.

Tüm Kişilerinizin E-posta Görünen Ad Biçimlerini Toplu Olarak Değiştirin

İlk olarak, Outlook'u başlatın ve “Alt + F11” tuşlarına basarak “Visual Basic” penceresine erişin.
Ardından yeni bir modül açın ve aşağıdaki VBA kodlarını içine kopyalayın.

Sub BatchChangeContactDisplayName()
    Dim obApp As Application
    Dim olContacts As Outlook.Items
    Dim obj As Object
    Dim oContact As Outlook.ContactItem
    Dim strName As String
 
    Set olContacts = Session.GetDefaultFolder(olFolderContacts).Items
 
    For Each obj In olContacts
        If TypeName(obj) = "ContactItem" Then
           Set oContact = obj
           With oContact
                'Display name format: "fullname (company name)(email address)"
                 strName = .FullName & " (" & .CompanyName & ")" & " (" & .Email1Address & ") "
                .Email1DisplayName = strName
                .Save
           End With
        End If
    Next
End Sub

Ekstra İpuçları:

Sıralamayı "tam ad", "firma adı" ve "e-posta adresi" şeklinde tercihinize göre değiştirebilirsiniz.
".Ad Soyad”, “Ad Soyad” içindeki formatı ifade eder. “Soyadı Adı” içinde göstermek istiyorsanız, “.SoyadıVeAd" yerine.

Akabinde VBA kodlarını yapıştırdıktan sonra yeni makroyu Hızlı Erişim Araç Çubuğuna eklemelisiniz. Aşağıdaki adımları takip et:

İlk olarak, ana Outlook penceresine geri dönün ve Hızlı Erişim Araç Çubuğundaki aşağı oka basın.
Açılır listeden "Diğer Komutlar"ı seçin.
Daha sonra “Outlook Seçenekleri” penceresinde, “Komutları nereden seç” kutusundaki “Makroları” seçmelisiniz.
Ardından, hedef makroya odaklanın ve ortadaki "Ekle" düğmesine basın.
Son olarak “OK” butonuna tıklayın.

Sonunda, varsayılan kişi klasörünüze dönebilirsiniz. Hızlı Erişim Araç Çubuğundaki makro düğmesine tıklayın. Bundan sonra, kontrol etmek için bir kişiyi açabilirsiniz. E-posta görünen ad biçiminin değiştirildiğini göreceksiniz.

Outlook Veri Kaybından Kaçış

Hepimizin bildiği gibi, Outlook hatalara ve bozulmalara açıktır. Bu nedenle, Outlook verilerini korumak ve veri kaybını önlemek zorlu bir iştir. Bu nedenle, Outlook verileriniz için düzenli bir yedekleme yapmalısınız, bu da size çok şey katacaktır. Outlook veri hasarı kurtarma Outlook çökmesi durumunda. Ayrıca, gibi güçlü bir onarım aracı elde etmek önemlidir. DataNumen Outlook Repair. Sonuç olarak, yedekleme güncel değilse veya etki yaratamıyorsa kullanışlı olacaktır.

Yazar Tanıtımı:

Shirley Zhang, bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. onarım SQL Server mdf veritabanı hasarı ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com