Skip to main content

Bir Word belgesindeki tüm dipnotları nasıl seçerim?

Author: Siluvia Last Modified: 2025-06-10

Normalde, Ctrl + A tuşları ile tüm Word belgesini seçtiğinizde, tüm dipnotlar seçim dışında bırakılır. Eğer sadece belgedeki tüm dipnotları seçmek istiyorsanız, bunu nasıl yapabilirsiniz? Bu makale, bu sorunu çözmek için size üç yöntem sunar.

Ctrl + A ile bir belgedeki tüm dipnotları seçin

Benzer Biçimlendirmeyle Metin Seç özelliği ile bir belgedeki tüm dipnotları seçin

VBA kodu ile bir belgedeki tüm dipnotları seçin


Ctrl + A ile bir belgedeki tüm dipnotları seçin

Bir Word belgesindeki tüm dipnotları aynı anda seçmek için Ctrl + A kısayol tuşunu kullanabilirsiniz. Lütfen aşağıdaki adımları izleyin.

İmlecinizi belgenizin herhangi bir dipnotuna yerleştirin ve Alt + A tuşlarına aynı anda basın, böylece mevcut belgedeki tüm dipnotlar hemen seçilecektir.


Benzer Biçimlendirmeyle Metin Seç özelliği ile bir belgedeki tüm dipnotları seçin

Benzer Biçimlendirmeye Sahip Metni Seç özelliği, bir belgedeki tüm dipnotları seçmenize yardımcı olabilir.

1. İmlecinizi belgenizin herhangi bir dipnotuna yerleştirin.

2. Ana sekmesinde, Seç > Benzer Biçimlendirmeye Sahip Tüm Metni Seç'i tıklayın. Ekran görüntüsüne bakın:

Select All Text With Similar Formatting option on the Home tab on the ribbon

Daha sonra mevcut belgedeki tüm dipnotlar hemen seçilecektir.


VBA kodu ile bir belgedeki tüm dipnotları seçin

Aşağıdaki VBA kodu da bir belgedeki tüm dipnotları aynı anda seçmenize yardımcı olabilir. Lütfen aşağıdaki adımları izleyin.

1. Tüm dipnotları seçeceğiniz belgede, 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'ü tıklayın, ardından aşağıdaki VBA kodunu Modül penceresine kopyalayın. Ekran görüntüsüne bakın:

VBA kodu: Bir Word belgesindeki tüm dipnotları seçin

Sub SelectAllFootnoteTexts()
    Dim xDoc As Document
    Dim xRange As Range
    Set xDoc = ActiveDocument
    If xDoc.Footnotes.Count > 0 Then
        Set xRange = xDoc.Footnotes(1).Range
        xRange.WholeStory
        xRange.Select
    End If
End Sub

VBA window with the above code pasted into a module

3. Ardından bu kodu çalıştırmak için F5 tuşuna basın. Mevcut belgedeki tüm dipnotlar aynı anda seçilir.


İlgili makaleler:

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! 🚀