Skip to main content

Kutools for Office — Bir Paket. Beş Araç. Daha Fazla İş Yapın.

Microsoft Word'de yorumları dipnotlara veya son notlara nasıl dönüştürürsünüz?

Author Siluvia Last modified

Word belgenizde birden fazla yorum olduğunu varsayalım, bu yorumların tümünü aynı anda dipnotlara veya son notlara nasıl dönüştürebilirsiniz? Bu makale, bunu gerçekleştirmek için VBA yöntemleri sunar.

Yorumları VBA kodu ile dipnotlara veya son notlara dönüştürme


Yorumları VBA kodu ile dipnotlara veya son notlara dönüştürme

Aşağıdaki VBA kodları, geçerli belgedeki tüm yorumları hızlı bir şekilde dipnotlara veya son notlara dönüştürmenize yardımcı olabilir. Lütfen şu adımları izleyin.

1. Yorumları dipnotlara veya son notlara dönüştüreceğiniz belgeyi açın ve Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına basın.

2. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül'e tıklayın. Ardından aşağıdaki VBA kodunu Modül penceresine kopyalayın.

VBA window with a module inserted

VBA kodu: Yorumları dipnotlara dönüştürme:

Sub ConvertCommentsToFootnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

VBA kodu: Yorumları son notlara dönüştürme:

Sub ConvertCommentsToEndnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. Kodu çalıştırmak için F5 tuşuna basın.

Geçerli belgedeki tüm yorumlar, uyguladığınız VBA koduna göre hemen dipnotlara veya son notlara dönüştürülecektir.


İlgili makaleler:

AI-Geliştirilmiş Kutools for Word ile Daha Az Zamanda Daha Fazla İş Yapın

Kutools for Word sadece bir araç seti değil - üretkenliğinizi artırmak için tasarlanmış akıllı bir çözüm. Yapay zeka destekli yetenekler ve en temel özelliklerle, Kutools size daha az zamanda daha fazla iş yapma imkanı sunar:

  • İçeriği anında özetleyin, yeniden yazın, oluşturun ve çevirin.
  • Yazarken gramer, noktalama ve stil önerileriyle metni gerçek zamanlı olarak düzeltin.
  • Düzeni, stili ve yapıyı bozmadan içeriği yeniden ifade edin ve çevirin.
  • İçeriğinizi 40'tan fazla dile kolayca çevirerek küresel olarak erişiminizi genişletin.
  • Geçerli belge içeriğine dayalı anında yardım ve akıllı içgörüler alın.
  • Bir görevi tamamlama konusunda soru sorun - bölüm sonlarını kaldırma gibi - ve yapay zeka size rehberlik edecek ya da sizin için yapacaktır.
  • Hassas veya gizli bilgileri birkaç saniye içinde düzenleyerek tamamen gizliliği sağlayın.
  • Tüm araçlar Word içinde sorunsuz çalışır ve her zaman ulaşılabilir durumdadır.
  • Belgeleri oluşturun, iyileştirin, çevirin, özetleyin ve güvenli hale getirin.
  • Yazarken gerçek zamanlı olarak grameri, netliği ve tonu geliştirin.
  • Hiçbir düzen veya biçimlendirme değişikliği olmadan içeriği yeniden ifade edin ve çevirin.
  • Bir görevi tamamlama konusunda soru sorun - bölüm sonlarını kaldırma gibi - ve yapay zeka size rehberlik edecek ya da sizin için yapacaktır.
  • Tüm araçlar Word içinde sorunsuz çalışır ve her zaman ulaşılabilir durumdadır.
Kutools for Word Hakkında Daha Fazla Bilgi Edinin Şimdi İndirin
Kutools for Word features

En İyi Ofis Verimliliği Araçları

Kutools for Word - Word deneyiminizi 100 dikkate değer özellik ile geliştirin!

🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Süper Parlat (Biçimi Koru) / Süper Çeviri (Biçimi Koru) / AI Redaksiyon / Yapay Zeka Düzeltme...

📘 Belge Uzmanlığı: Sayfaları Böl / Belgeleri Birleştir / Aralığı PDF/TXT/DOC/HTML gibi çeşitli biçimlerde Dışa Aktar / Toplu PDF Dönüştürme...

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

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

Yaratıcı Ekler: Binlik Ayırıcıları Ekle / Onay Kutuları Ekle / Radyo Düğmeleri Ekle / QR Kodu Oluştur / Barkod Oluştur / Birden fazla Resim Ekle / Daha fazlasını Ekle grubunda keşfedin...

🔍 Hassas Seçimler: Belirli Sayfa / Tabloları / Şekilleri / Başlık Paragraflarını tam olarak seçin / Daha fazla Seç özelliği ile gezinmeyi geliştirin...

Özel Geliştirmeler: Herhangi bir Aralığa Hızla Git / Tekrarlayan Metni Otomatik Ekle / Belge Pencereleri arasında geçiş yap /11 Dönüşüm aracı...

🌍 40+ Dil Desteği: Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40'tan fazla dil destekleniyor!

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

✨ Kutools for Office – Tek kurulumda beş güçlü araç!

Şunları içerir: Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint

📦 Tüm5 araca tek bir pakette sahip olun | 🔗 Microsoft Office ile sorunsuz entegrasyon | ⚡ Zamanı Kaydet ve anında verimliliği artır

En İyi Ofis Verimliliği Araçları

Kutools for Word - 100+ Word için araçlar