Skip to main content

Word yorumlarında gösterilen yazar adını nasıl değiştirilir

Author: Siluvia Last Modified: 2025-06-10

Bu makale, Word'de yorumlar için kullanılan varsayılan yazar adını değiştirmeyi ve ayrıca bir belgedeki mevcut yorumlarda yazar adını güncellemeyi kapsar. Bunu ya Word'un yerleşik ayarlarıyla ya da bir VBA makrosu ile yapabilirsiniz.

Yeni yorumlar için varsayılan yazar adını değiştirin

Bir belgedeki mevcut yorumların yazar adını değiştirin


Yeni yorumlar için varsayılan yazar adını değiştirin

Yeni yorumların farklı bir yazar adı göstermesini istiyorsanız, Word Seçenekleri ayarlarındaki kullanıcı adını değiştirmeniz gerekir.

  1. Bir Word belgesi açın, ardından "Dosya" > "Seçenekler" öğesine tıklayın.
  2. "Word Seçenekleri" penceresinde, "Genel" sekmesine gidin.
  3. "Kullanıcı Adı" kutusundaki adı değiştirin.
  4. Değişikliği kaydetmek için "Tamam" düğmesine tıklayın.
    User name box in Word Options

Artık eklediğiniz her yeni yorum, güncellenmiş kullanıcı adını gösterecektir.


Bir belgedeki mevcut yorumların yazar adını değiştirin

Eğer birçok yoruma sahip bir belgeniz varsa ve tüm yorumların yazar adlarını aynı anda güncellemeniz gerekiyorsa, bunu hızlıca yapmak için bir VBA makrosu kullanabilirsiniz.

  1. Değiştirmek istediğiniz yorumları içeren aralığı seçin veya tüm belgeyi seçmek için "Ctrl + A" tuşlarına basın.
  2. Microsoft Visual Basic for Applications penceresini açmak için "Alt + F11" tuşlarına basın.
  3. VBA düzenleyicisinde, "Ekle" > "Modül" öğesine tıklayın. Ardından aşağıdaki VBA kodunu modül penceresine yapıştırın:
    Sub ChangeCommentAuthor()
    'Updated by ExtendOffice 20181112
        Dim I As Long
        Dim xNewName As String
        Dim xShortName As String
        If Selection.Comments.Count = 0 Then
            MsgBox "No comments in your selection!", vbInformation, "Kutools for Word"
            Exit Sub
        End If
        xNewName = InputBox("New author name?", "Kutools for Word")
        xShortName = InputBox("New author initials?", "Kutools for Word")
        If xNewName = "" Or xShortName = "" Then
            MsgBox "The author name/initials can’t be empty.", vbInformation, "Kutools for Word"
            Exit Sub
        End If
        With Selection
            For I = 1 To .Comments.Count
                .Comments(I).Author = xNewName
                .Comments(I).Initial = xShortName
            Next I
        End With
    End Sub
  4. Makroyu çalıştırmak için "F5" tuşuna basın. Açılan iletişim kutusunda, yeni yazar adını yazın ve "Tamam" düğmesine tıklayın.
    Comments Author Name dialog box
  5. Sonraki iletişim kutusunda, yeni baş harfleri yazın ve "Tamam" düğmesine tıklayın.
    Comments initials dialog box

Seçili aralıktaki tüm yorumların yazar adları artık güncellenmiştir.

Comments’ author names are changed

En İyi Ofis Verimlilik Araçları

Kutools for Word - Word Deneyiminizi 100’den Fazla Olağanüstü Özellik ile Zirveye Taşıyın!

🤖 Kutools AI Özellikleri: Yapay Zeka Asistanı / Gerçek Zamanlı Asistan / Süper Parlat (Biçimi Koru) / Süper Çeviri (Biçimi Koru) / AI Redaksiyon / Yapay Zeka Düzeltme...

📘 Belge Ustalığı: Sayfaları Böl / Belgeleri Birleştir / Seçimi Farklı Formatlarda Dışa Aktar (PDF/TXT/DOC/HTML...) / Toplu PDF’ye Dönüştür...

İçerik Düzenleme: Birden Fazla Dosyada Toplu Bul ve Değiştir / Tüm Resimleri Yeniden Boyutlandır / Tablo Satır ve Sütunlarını Çevir / Tabloyu Metne Dönüştür...

🧹 Zahmetsiz Temizlik: Fazla Boşlukları / Bölüm Sonlarını / Metin Kutularını / Bağlantıları Kolayca Temizleyin. Daha fazla kaldırma aracı için Kaldır grubuna göz atın...

Yaratıcı Ekleme: Binlik Ayraçları Ekle / Onay Kutuları Ekle / Radyo Düğmeleri Ekle / QR Kodu / Barkod / Birden Fazla Resim / Ekle grubunda daha fazlasını keşfedin...

🔍 Hassas Seçimler: Belirli Sayfaları / Tabloları / Şekilleri / Başlık Paragraflarını Hedefleyin; daha fazla Seç özelliğiyle gezinmeyi geliştirin...

Yıldız Geliştirmeler: Herhangi Bir Konuma Hızla Git / Tekrarlayan Metni Otomatik Ekle / Belge Pencereleri Arasında Geçiş Yap /11 Dönüştürme Aracı...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Bu özellikleri denemek ister misiniz? Kutools for Word’u hemen indirin! 🚀