Note: The other languages of the website are Google-translated. Back to English

Bir Word belgesindeki birden çok belirli sayfa nasıl silinir?

Bir Word belgesinde, geçerli sayfa içeriğini seçebilir ve ardından geçerli sayfayı kolayca silmek için Sil tuşuna basabilirsiniz. Ancak, büyük bir Word dosyasından birden çok sayfayı kaldırmanız gerekirse, bunu nasıl hızlı bir şekilde çözebilirsiniz?

Git özelliğiyle Word belgesindeki bir dizi sayfayı silin

VBA kodu ile Word belgesindeki birden çok belirli sayfayı silin


Git özelliğiyle Word belgesindeki bir dizi sayfayı silin

Bir Word belgesinden bir dizi ardışık sayfayı silmek isterseniz, Git özelliği size bir iyilik yapabilir.

1. Sayfaları silmek istediğiniz Word belgesini başlatın.

2. Daha sonra tuşuna basın. F5 tuşuna basarak Bul ve Değiştir iletişim kutusunun altında git sekmesini tıklayın Sayfa içinde Neye git liste kutusuna gidin ve ardından silmek istediğiniz başlangıç ​​sayfası numarasını girin ve Keşfet belirli sayfaya gitmek için anahtar, ekran görüntüsüne bakın:

doc birden çok sayfayı sil 1

2. Sonra kapat şunu Bul ve Değiştir iletişim kutusunu seçin ve F8 açmak için Genişletme modu.

3. Basmaya devam et F5 tuşuna basarak Bul ve Değiştir iletişim kutusunda bu sefer silmek istediğiniz bitiş sayfası numarasını girin ve ardından Keşfet anahtar. 15 ile 20 arasındaki tüm sayfalar aynı anda seçilmiştir. Ekran görüntüsüne bakın:

doc birden çok sayfayı sil 2

4. Sonunda, basın Sil Bu sayfaları bir defada silmek için doğrudan tuşuna basın.


VBA kodu ile Word belgesindeki birden çok belirli sayfayı silin

Bir Word dosyasındaki ardışık olmayan birden çok belirli sayfayı silmek için aşağıdaki VBA kodu size yardımcı olabilir.

1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: Word dosyasında birden çok belirli sayfayı silin:

Sub DeletePagesInDoc()
    Dim xRange As Range
    Dim xPage As String
    Dim xDoc As Document
    Dim xArr
    Dim I, xSplitCount As Long
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _
            "use comma to separate numbers", "KuTools for Word", "")
    xArr = Split(xPage, ",")
    xPageCount = UBound(xArr)
    For I = xPageCount To 0 Step -1
        Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I)
        xDoc.Bookmarks("\Page").Range.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. Daha sonra, tuşuna basın. F5 Bu kodu çalıştırmak için bir tuşa basın ve silmek istediğiniz sayfa numaralarını girmenizi hatırlatmak için bir istem kutusu açılır, lütfen sayfa numaralarını virgülle ayırın, ekran görüntüsüne bakın:

doc birden çok sayfayı sil 3

4. Ve sonra tıklayın OK düğmesi, belirttiğiniz tüm sayfalar bir defada silindi.


Birden çok ayrı sayfa seçin ve ardından bunları bir defada silin:

Büyük bir Word belgesinden birden çok belirli sayfayı silmek istiyorsanız, Kutools for Word's Sayfaları Seçin özelliği, önce ihtiyacınız olan herhangi bir sayfayı seçmenize yardımcı olabilir ve ardından Sil bunları bir kerede silmek için anahtar.

doc birden çok sayfayı sil 4

Kutools for Word: 100'den fazla kullanışlı Word eklentisi ile 60 günde sınırlama olmaksızın ücretsiz deneyin. Hemen İndir ve ücretsiz deneme için tıklayın!


Önerilen Word Üretkenlik Araçları

 

Kutools For Word - Word İçin 100'den Fazla Gelişmiş Özellik,% 50 Zaman Kazanın

  • Karmaşık ve tekrarlanan işlemler saniyeler içinde tek seferlik işlem yapılabilir.
  • Klasörler arasında birden çok görüntüyü aynı anda Word belgesine ekleyin.
  • Birden çok Word dosyasını klasörler arasında istediğiniz sırada birleştirin ve birleştirin.
  • Geçerli belgeyi başlık, bölüm sonu veya diğer kriterlere göre ayrı belgelere bölün.
  • Dosyaları Doc ve Docx, Docx ve PDF, ortak dönüştürme ve seçim için araçlar koleksiyonu vb. Arasında dönüştürün ...
Yorumları sıralama ölçütü
Yorumlar (3)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Çok faydalı çözümler için teşekkürler!!!!!!!!!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Teşekkürler. vba'yı nereden öğrendin
Bu yorum sitedeki moderatör tarafından en aza indirildi
Ciao, un Documento di svariate sayfasında (yaklaşık 100) "hızlı" ortadan kaldırmak için invece, ardışık olmayan bir şekilde mümkün mü?
Önlemlerin ortadan kaldırılması için başvuruda bulunun.

Grazie.
Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır