Word Belgenizdeki Tüm Bölüm Sonlarını Hızlıca Silme 3 Yolu

Bu yazımızda, Word belgenizdeki tüm bölüm sonlarını hızlı bir şekilde silmenin 3 yolunu sizinle paylaşmak istiyoruz.

Bölüm sonları, Word belgesinde birden çok bölüm oluştururken kullanışlıdır. Böylece farklı bölümleri farklı stillerde biçimlendirebilirsiniz. Ve belgeye hızlı bir şekilde bölüm sonları eklemeniz için bir önceki makalemiz: Bölüm Sonlarını Word Belgenize Hızlıca Eklemenin 3 Yolu

Ancak, stilleri değiştirmek, bölümleri yeniden bölmek gibi bir belgeyi gözden geçirmek oldukça yaygındır. Özellikle, yapılacak büyük bir ayarlama varsa, muhtemelen tüm bölüm sonlarını kaldırmanız gerekecektir. Toplu olarak bölüm sonlarını silmek için kullanabileceğiniz 3 yöntem aşağıdadır.

Yöntem 1: Belgedeki Tüm Bölüm Sonlarını Bulun

1. Öncelikle Word'de "Bul ve Değiştir" kutusunu açmak için "Ctrl + H" tuşlarına basın.
2. Daha sonra imleci "Ne bul" metin kutusunun içine getirin.
3. Daha fazla seçenek elde etmek için "Daha Fazla" düğmesine tıklayın.
4. Ardından "Özel" i tıklayın ve menüsünden "Bölüm Sonu" nu seçin. Daha sonra "Ne bul" metin kutusunda "^ b" göreceksiniz. Bu nedenle alternatif bir yol, 2. adımın hemen ardından “^ b” girmektir.
5. Son olarak, "Değiştir" kutusunu boş bırakın ve "Tümünü Değiştir" i tıklayın. Onay kutusunda "Tamam" ı tıklayın.

Yöntem 2: Bir Belgedeki Tüm Bölüm Sonlarını Silmek İçin Bir Makro Çalıştırın

İşte tüm istenmeyen bölüm sonlarından kurtulmanın otomatik yolu.

1. Başlamak için, "Alt + F11" tuşlarına basarak Word'de VBA düzenleyicisini açın.
2. Ardından “Normal” e tıklayarak yeni bir modül oluşturun.
3. Ardından "Ekle" yi tıklayın ve "Modül" ü seçin.
4. Şimdi modülü çift tıklama ile açın.
5. Sağ taraftaki kodlama alanına aşağıdaki kodları yapıştırın:

Sub DeleteAllSectionsInOneDoc()
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^b"
      .Replacement.Text = ""
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
  End With
End Sub

6. Son olarak, "Çalıştır" ı tıklayın.

Tüm bölüm sonlarını bir saniyede hiçbir yerde bulamayacaksınız.

Yöntem 3: Birden Çok Belgede Tüm Bölüm Sonlarını Silin

Benzer şekilde, hızlı ve kirli bir şekilde yapmak istiyorsak bir makro çalıştırmalıyız.

1. Her şeyden önce, tüm hedef belgeleri tek bir klasöre koyun.
2. Ardından, yöntem 2'deki adımlarla bir makro kurun.
3. Bunun yerine bu makroyu çalıştırın:

Sub DeleteAllSectionBreaksInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "No folder is selected! Please select the target folder."
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
 
    With Selection
      .HomeKey Unit:=wdStory
      With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "^b"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
      End With
      Selection.Find.Execute Replace:=wdReplaceAll
    End With
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. Açılan "Gözat" penceresinde, belgeleri kaydettiğiniz klasörü seçin.
5. Son olarak, ama en az değil, "Tamam" ı tıklayın.

Veri Kaybına Hazırlanın

Normalde, iyi kullanım alışkanlığı, iyi şans ve tüm nimetlerle Word'de çok şey başarabilirsiniz. Ancak çökmeler her an başınıza gelebilir. Bu nedenle, belgelerinizi düzenli olarak yedeklemek hayati önem taşır. Elinizde bir yedek olduğunda, çalışmaya başlamadan önce daha güvende olursunuz. docx düzeltmesi.

Yazar Tanıtımı:

Vera Chen bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. xls kurtarma hem de pdf onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com