Excel'de tüm açıklamalara ait yazar adı nasıl değiştirilir?

Bir çalışma sayfasına yorum eklediğinizde, yorumun sonuna yazarınızın adı otomatik olarak iki nokta üst üste (:) ile birlikte eklenir. Ancak bazen bu yazar adını değiştirmek isteyebilirsiniz. Peki bunu nasıl yapabilirsiniz? Excel’de yorum yazarının adını aşağıdaki yöntemlerle kolayca değiştirebilirsiniz.

Tüm Yeni Yorum yorumlarının varsayılan yazar adını Excel Seçenekleri’ni yapılandırarak değiştirin

Tüm mevcut yorumların yazar adını etkin veya tüm sayfalarda Kutools for Excel ile hızlıca değiştirin

Tüm çalışma kitabındaki mevcut yorumların yazar adını VBA koduyla değiştirin

Tüm Yeni Yorum öğelerinin varsayılan yazar adını Excel Seçenekleri'ni yapılandırarak değiştirin

Tüm yeni yorum öğelerinin yazar adını değiştirmek için Excel kullanıcı adınızı güncelleyebilirsiniz.

1. Excel 2010/2013/2016 içinde Dosya > Seçenekler seçeneğine tıklayın veya Excel 2007 içinde Office düğmesine > Excel Seçenekleri > Popüler seçeneğine tıklayabilirsiniz.

2. Excel Seçenekleri iletişim kutusunda, sol çubukta **Genel**’e tıklayın. Ardından sağ bölmede yer alan Microsoft Office kopyanızı kişiselleştirin bölümüne kaydırın ve eski Kullanıcı Adı değerini istediğiniz yeni değerle değiştirin. Son olarak, Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:

Şu andan itibaren çalışma sayfanıza ekleyeceğiniz yeni yorumların yazar adı, yukarıda belirttiğiniz yeni ad olacaktır. Ancak mevcut yorumlardaki yazar adları, eski adlarıyla aynı kalacaktır.

Mevcut tüm açıklamaların yazar adını Kutools for Excel ile yeni bir adla kolayca değiştirin

Yukarıdaki yöntemin yanı sıra, size Açıklamada Yazar Ekle/Kaldır yardımcısını sunan Kutools for Excel’i öneriyorum. Bu yardımcı program sayesinde yalnızca aktif çalışma sayfasındaki değil, aynı zamanda tüm çalışma kitabındaki açıklamaların yazar adlarını ihtiyaç duyduğunuz yeni isimle kolayca değiştirebilirsiniz.

1. Tüm açıklama yazar adlarını değiştirmek istediğiniz çalışma sayfasına geçin, ardından Kutools > Daha Fazla > Açıklamada Yazar Ekle/Kaldır seçeneğine tıklayın. Ekran görüntüsüne bakın:

2. Açıklamada Yazar Ekle/Kaldıriletişim kutusunda aşağıdaki gibi yapılandırmanız gerekir:

Öncelikle Eylem kapsamındaki tüm açıklamalardan yazar adını kaldırın.

• (1)Kapsam Açılır Liste bölümünde, yalnızca Geçerli çalışma sayfası içindeki yazar adlarını değiştirmek istiyorsanız, Geçerli Çalışma Sayfası seçeneğini belirleyin. Tüm çalışma kitabında yazar adlarını değiştirmek için ise Tüm Sayfalar seçeneğini kullanın.
• (2)Yorumlardan Kullanıcı Adını Kaldır seçeneğini seçin.
• (3)Uygula düğmesine tıklayın.
• (4) Açılan iletişim kutusunda Tamamdüğmesine tıklayın

Ardından, Eylem kapsamındaki tüm açıklamalara yeni yazar adını ekleyin.

• (1) Yorumların yeni yazar adını Kullanıcı Adıkutusuna girin ve ardından Yorumlara Kullanıcı Adı ekleseçeneğini belirleyin;
• (2)Uyguladüğmesine tıklayın;
• (3) Açılan iletişim kutusunda Tamamdüğmesine tıklayın;
• (4) İletişim kutusunu kapatmak için Kapat düğmesine tıklayın.

Bir aralıktaki tüm negatif sayıları pozitife dönüştürmek için VBA kodunu kullanma

Tüm çalışma kitabındaki mevcut tüm açıklamaların yazar adını değiştirmek istiyorsanız aşağıdaki VBA kodu size yardımcı olacaktır:

1. Aynı anda Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın. Ardından Microsoft Visual Basic for Applications penceresinde Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu modül penceresine kopyalayıp yapıştırın:

VBA kodu: Tüm çalışma kitabındaki mevcut tüm açıklamaların yazar adını değiştirme

Sub ChangeCommentName()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
Dim oldName As String
Dim newName As String
xTitleId = "KutoolsforExcel"
oldName = InputBox("Old Name", xTitleId, Application.UserName)
newName = InputBox("New Name", xTitleId, "")
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        xComment.Text (Replace(xComment.Text, oldName, newName))
    Next
Next
End Sub

2. Kodu çalıştırmak için F5 tuşuna basın; ardından metin kutusunda eski açıklama yazarının adını gösteren bir Kutools for Excel iletişim kutusu açılacaktır. Lütfen Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:

3. Ardından başka bir Kutools for Excel iletişim kutusu açılacaktır. Lütfen ihtiyacınız olan yeni yorum yazar adını metin kutusuna yazın ve ardından Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:

Artık çalışma kitabındaki tüm açıklamaların yazar adları, otomatik olarak “Yeni Ad” olarak güncellendi.

Not: Bu yöntem, eklediğiniz yeni yorum öğeleri için çalışmaz.

Demo: Tüm açıklamaların yazar adını Kutools for Excel ile değiştirme

İlgili makaleler