Word belgesinde birden çok satırı tek bir paragrafta nasıl birleştirir veya birleştiririm?
Word belgenizde yüzlerce ve binlerce paragraf varsa, bu belgeyi yazdırırken çok fazla kağıda ihtiyaç duyacaktır. Kağıtları kaydetmek için, bu birden çok satırı tek bir paragrafta birleştirebilirsiniz. Bununla birlikte, tüm bu satırları Word belgesinde hızlı ve kolay bir şekilde tek bir paragrafta nasıl birleştirebilirsiniz?
Bul ve Değiştir işleviyle birden çok satırı tek bir paragrafta birleştirin veya birleştirin
VBA kodu ile birden çok satırı tek bir paragrafta birleştirin veya birleştirin
Bul ve Değiştir işleviyle birden çok satırı tek bir paragrafta birleştirin veya birleştirin
The Bul ve Değiştir Word'deki işlev, birden çok satırı tek bir paragrafta birleştirmenize yardımcı olabilir, lütfen şu şekilde yapın:
1. Tek bir paragrafta birleştirmek istediğiniz paragrafları seçin.
2. Ve sonra tıklayın Ana Sayfa > bulmak > Gelişmiş Bul gitmek için Bul ve Değiştir iletişim kutusunda, Bul ve Değiştir iletişim kutusunun altında bulmak sekmesi, lütfen girin ^p içine Ne bul metin kutusunu seçin ve ardından Şu anki seçim seçeneği Bulmak açılır liste, ekran görüntüsüne bakın:
3. Ardından, değiştirmek sekmesinden ayrılın ve Ile değiştirin metin kutusu boş ve ardından Tümünü Değiştir düğmesi, ekran görüntüsüne bakın:
4. Ve seçilen tüm paragraflar tek bir paragrafta birleştirildi, ekran görüntüsüne bakın:
VBA kodu ile birden çok satırı tek bir paragrafta birleştirin veya birleştirin
İşte bu işi Word'de bitirmenize yardımcı olabilecek başka bir yararlı yöntem de, lütfen aşağıdaki adımları uygulayın:
1. Tek bir paragrafta birleştirmek istediğiniz satırları seçin.
2. Sonra, basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
3. Ve sonra tıklayın Ekle > modül, aşağıdaki kodu kopyalayıp açılan boş modüle yapıştırın.
VBA kodu: Birden çok satırı tek bir paragrafta birleştirin:
Sub CleanUpPastedText()
Dim xSelection As Selection
On Error Resume Next
Application.ScreenUpdating = False
Set xSelection = Application.Selection
If xSelection.Type <> wdSelectionIP Then
FindAndReplace xSelection
Else
If MsgBox("Do you want to merge all selected lines into one paragraph?", vbYesNo + vbInformation, "Kutools for Word") = vbNo Then Exit Sub
xSelection.WholeStory
Set xSelection = Application.Selection
xSelection.HomeKey wdStory
FindAndReplace xSelection
End If
Application.ScreenUpdating = True
Application.ScreenRefresh
MsgBox "The selected lines have been merged into one paragraph.", vbInformation, "Kutools for Word"
End Sub
Sub FindAndReplace(Sel As Selection)
With Sel.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
.Text = "[^s^t]{1,}^13"
.Replacement.Text = "^p"
.Execute Replace:=wdReplaceAll
.Text = "([!^13])([^13])([!^13])"
.Replacement.Text = "\1\3"
.Execute Replace:=wdReplaceAll
.Text = "[ ]{2,}"
.Replacement.Text = " "
.Execute Replace:=wdReplaceAll
.Text = "([a-z])-[ ]{1,}([a-z])"
.Replacement.Text = "\1\2"
.Execute Replace:=wdReplaceAll
.Text = "[^13]{1,}"
.Replacement.Text = "^p"
.Execute Replace:=wdReplaceAll
End With
End Sub
4. Ve sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve aşağıdaki ekran görüntüsü gibi seçilen tüm paragraflar tek bir paragrafta birleştirilmiştir:
En İyi Ofis Üretkenlik Araçları
Kutools for Word - Over ile Kelime Deneyiminizi Yükseltin 100 Dikkat Çekici Özellikler!
🤖 Kutools Yapay Zeka Asistanı: Yazılarınızı AI ile dönüştürün - İçerik Oluştur / Metni Yeniden Yaz / Belgeleri Özetleyin / Bilgi İçin Arayın Belgeye dayalı, hepsi Word'de
📘 Belge Ustalığı: Sayfaları Böl / Belgeleri Birleştir / Seçimi Çeşitli Formatlarda Dışa Aktar (PDF/TXT/DOC/HTML...) / PDF'ye Toplu Dönüştürme / Sayfaları Görüntü Olarak Dışa Aktar / Aynı Anda Birden Çok Dosyayı Yazdırma...
✏ İçerik Düzenleme: Toplu Bul ve Değiştir Birden Çok Dosyada / Tüm Resimleri Yeniden Boyutlandır / Tablo Satırlarını ve Sütunlarını Yer Değiştirme / Tabloyu Metne Dönüştür...
🧹 Zahmetsiz Temizlik: Uzaklaşın Ekstra Alanlar / Bölüm Sonları / Tüm Başlıklar / Metin kutuları / Köprüler / Daha fazla sökme aleti için sayfamıza gidin Grubu Kaldır...
➕ Yaratıcı Ekler: Ekle Bin Ayırıcı / Onay Kutuları / Radyo Düğmeleri / QR Code / Barkod / Çapraz Çizgi Tablosu / Denklem Başlığı / Görüntü Başlık / Tablo başlığı / Çoklu Resimler / Daha fazlasını şurada keşfedin: Grup Ekle...
🔍 Hassas Seçimler: Nokta tespiti belirli sayfalar / tablolar / şekiller / başlık paragrafları / Gezinmeyi şununla geliştirin: Daha Özellikleri seçin...
⭐ Yıldız Geliştirmeleri: Herhangi bir konuma hızla gidin / tekrarlanan metni otomatik olarak ekle / belge pencereleri arasında sorunsuzca geçiş yapın / 11 Dönüşüm Aracı...