Excel'de her x satırda bir sayfa sonu nasıl eklenir?

Büyük Excel çalışma sayfalarını yazdırmaya hazırlarken, okunabilirliği artırmak ve her yazdırılan sayfanın tutarlı, iyi organize edilmiş veriler içermesini sağlamak için düzenli aralıklarla (örneğin, her birkaç satırdan sonra) sayfa sonları eklemeniz gerekebilir. Excel'de tek bir sayfa sonu eklemek kolay olsa da, özellikle geniş veri setleri için tekrarlayan aralıklarla (örneğin, her 3 veya 10 satırda bir) manuel olarak sayfa sonu eklemek hızlıca can sıkıcı bir görev haline gelebilir. Bu makalede, daha profesyonel ve yönetilebilir baskılar elde etmek için her x satırda bir otomatik olarak sayfa sonu ekleme konusunda birkaç pratik çözüm öğreneceksiniz.

• Excel'de VBA ile her X satırda bir sayfa sonu ekleme
• Toplu olarak her x satırda bir sayfa sonu ekleme
• Her x satırda bir satır başlığı ekleyerek toplu olarak sayfa sonu ekleme
• Sayfa Sonu Önizleme'yi kullanarak manuel olarak sayfa sonu ekleme

Excel'de VBA ile her X satırda bir sayfa sonu ekleme

Excel'de belirli sayıda satırdan sonra sayfa sonu eklemeniz gerekiyorsa, VBA özellikle büyük veri setleri için verimli bir otomasyon çözümü sunar. Makrolarla çalışmak konusunda yeniyken bile aşağıdaki süreci izleyebilirsiniz. Bu örnek, her 3 satırda bir sayfa sonu eklemeyi gösterir ancak yürütmeye sırasında istediğiniz aralığı belirtebilirsiniz.

1. Microsoft Visual Basic for Applications (VBA) düzenleyicisini açmak için Alt + F11 tuşlarına basın—bu, Excel’in makro kodlarını yazmak ve çalıştırmak için özel olarak tasarlanmış yerleşik araçtır.

2. Açılan VBA düzenleyicide, yeni bir modül oluşturmak için Ekle > Modül seçeneğine tıklayın. Ardından aşağıdaki VBA kodunu yeni oluşturulan modül penceresine kopyalayıp yapıştırın.

VBA: Çalışma sayfasındaki her X satırda bir sayfa sonu ekleme.

Sub InsertPageBreaks()
'Updateby20140618
Dim xLastrow As Long
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type:=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
For i = xRow + 1 To xLastrow Step xRow
    xWs.HPageBreaks.Add Before:=xWs.Cells(i, 1)
Next
End Sub

3Kodu çalıştırmak için Çalıştır düğmesine tıklayın (veya F5tuşuna basın). Sayfa sonlarının ardından kaç satır eklemek istediğinizi girmeniz için bir iletişim kutusu açılacak. Örneğin, "3" girerek her üçüncü satırdan sonra bir sayfa sonu ekleyebilirsiniz.

4. Tamam'a tıkladıktan sonra, betik aktif çalışma sayfanız boyunca belirtilen aralıklarda otomatik olarak sayfa sonları yerleştirecektir.

Sayfa sonları için VBA kullandığınızda, tekrarlanan betik çalışmaları çakışan sayfa sonları oluşturabileceği ve beklenmedik baskı sonuçları üretebileceği için çalışma sayfanızdaki mevcut manuel sayfa sonlarını kontrol ettiğinizden emin olun. Makroyu yeniden çalıştırmadan önce tüm sonları kaldırmak isterseniz, Sayfa Düzeni sekmesi altında Tüm Sayfa Sonlarını Sıfırla seçeneğini kullanın. VBA betiklerini çalıştırmadan önce dosyanızı kaydetmeyi unutmayın, çünkü düzenlemeler normal Geri Al işleviyle geri alınamaz.

Bu yaklaşım, Excel'de temel düzenleme konusunda rahat olan kullanıcılar ve gelişen ya da büyük veri aralıklarıyla uğraşan kullanıcılar için en uygunudur. Ancak, sık sık ayarlamalar veya standart dışı aralıklar gerektiği durumlarda, aşağıda açıklananlar gibi daha esnek veya GUI destekli çözümler düşünün.

Kutools for Excel ile her x satırda bir toplu olarak sayfa sonu ekleme

Kutools for Excel yüklüyse, toplu olarak sayfa sonu ekleme işlemini önemli ölçüde basitleştirebilirsiniz. Kutools'un Veriyi Böl özelliği, düzenli aralıklarla sayfa sonları eklemenizi sağlar ve her yeni sayfanın üst kısmında satır başlıklarını görünür tutmanızı sağlar. Bu özellikle raporlar veya tablolar için faydalıdır; burada tekrarlanan başlıklar netliği ve profesyonelliği artırır ve baskı düzeni tutarlılığı önceliklidir.

1. Kutools Plus sekmesinden Veriyi Böl seçeneğine tıklayarak aracı açın.

2Açılır Veriyi Böl diyalog kutusunda, kesin kontrol için aşağıdaki ayarları yapılandırın:

(1) Başlık aralığı alanındaki düğmesini kullanarak sütun başlıklarınızı içeren satırı seçin. Bu, başlıkların her yazdırılan sayfada tekrarlanmasını sağlar. Başlık Aralığı kutusundaki düğmeyi kullanarak sütun başlıklarınızı içeren satırı seçin. Bu, başlıkların her yazdırılan sayfada tekrarlanmasını sağlar.
(2) düğmesine tıklayın Veri aralığı kutusunda bölünmesini istediğiniz ana veri aralığını seçin.
(3) Her yazdırılan sayfada satır kutusuna her yazdırılan sayfada istediğiniz satır sayısını girin (örneğin, her 3 satırda bir kesim için 3 girin; her satırdan sonra bir kesim için 1 kullanın).
(4) 1 girin Segment sayısı kutusuna sayfayı buna göre bölün.

3. Veriyi işlemek için Tamam'a tıklayın.

Araç, seçili aralığı yeni bir çalışma sayfasına aktaracak, belirtildiği gibi otomatik olarak sayfa sonları ekleyecek ve başlık satırını tekrarlayacaktır. Doğrulama için, Görünüm sekmesine gidip Sayfa Sonu Önizleme'yi seçerek Sayfa Sonu Önizleme moduna geçin—burada mavi çizgiler sayfa sonlarını açıkça gösterecektir.

Bu yöntem, yazdırma için tekrarlanan başlıklara ve veri kümesi segmentasyonuna hassas kontrol ihtiyacı duyan kullanıcılar için uygundur. Orijinal veriler değiştirilmez; sonuçlar yeni bir çalışma sayfasında görüntülenir ki bu kaynak verinin korunması açısından faydalıdır.

Kutools for Excel ile her x satırda bir sayfa sonu ekleme

Kutools for Excel ayrıca, seçtiğiniz aralıkta her belirtilen sayıda satırdan sonra hızlı ve kolay bir şekilde sayfa sonu eklemenizi sağlayan adanmış Bir Araç Ek Sayfa Sonu Ekle özelliğini sunar. Bu araç, hem hızlı toplu işlemler için hem de tekrarlayan manuel giriş gerektirmeden esnek aralıklar gerektiren durumlar için uygundur. Özellikle, tekrarlanan başlıklara ihtiyaç duymayan ancak baskıdan önce düzenli sayfa bölümlendirme gerektiren veri tabloları için faydalıdır.

1. Sayfa sonu eklemek istediğiniz veri aralığını seçin ve ardından Kutools Plus > Yazdırma > Her Satırda Bir Sayfa Sonu Ekle bölümüne gidin.

2Açılır Her Satırda Bir Sayfa Sonu Ekle diyalog kutusunda, istediğiniz aralığı girin—örneğin, “1” girerek her diğer satırdan sonra bir sayfa sonu ekleyebilirsiniz. Tıklayın Tamam.

Onayladığınız anda, tüm sayfa sonları belirttiğiniz satır aralığına göre ayarlanacaktır. Sayfa sonlarını görsel olarak doğrulamak isterseniz, Görünüm sekmesinden Sayfa Sonu Önizleme ile görünümü yenileyin—burada mavi çizgiler sayfa sonlarını açıkça gösterecektir.

Sayfa Sonu Önizleme'yi kullanarak manuel olarak sayfa sonu ekleme

Daha küçük veri setleriyle çalışan veya sayfa sonları için özel, düzgün olmayan aralıklar gerektiren kullanıcılar için Excel'in yerleşik Sayfa Sonu Önizleme görünümü doğrudan manuel kontrole izin verir. Bu yaklaşım, otomatik çözümlerin gerekli olmadığı veya çok az esneklik sunduğu durumlar için idealdir.

1. Şeritten Görünüm > Sayfa Sonu Önizleme'ye geçin. Bu, mevcut sayfa sonlarını temsil eden kalın mavi çizgilerle çalışma sayfanızı görüntüler.

2. Yeni sayfanın başlamasını istediğiniz yerin hemen altındaki satırın ilk hücresini seçin, ardından Sayfa Düzeni sekmesine gidin, Kesintiler > Sayfa Sonu Ekle'ye tıklayın.

3. Her istenen kesim için işlemi tekrarlayın. Bir sayfa sonunu ayarlamanız gerekiyorsa, mavi çizgiyi yeni bir pozisyona sürüklemeniz yeterlidir.

Bu manuel yöntem, küçük veya nadiren yapılan görevler için basittir ancak çok sayıda sayfa için önerilmez, çünkü hızlıca zaman alıcı hale gelir. Eğer düzenli aralıklarla birçok kesim gerekiyorsa, otomatik VBA veya Kutools çözümleri çok daha etkilidir.

Excel'de sayfa sonu eklerken aşağıdaki ipuçlarını ve hata uyarılarını göz önünde bulundurun: Baskıdan önce sayfa sonlarının tam olarak istediğiniz gibi göründüğünden emin olmak için her zaman çalışma sayfanızı Sayfa Sonu Önizleme modunda önizleyin. Beklenmedik boş sayfalar veya hizalanmamış kesimler gibi hatalarla karşılaşırsanız, seçili aralığınızı kontrol edin, çakışan sayfa sonlarının olmadığını ve gerekirse gereksiz manuel kesimleri kaldırın. Unutmayın, Excel'de bir çalışma sayfası başına maksimum sayfa sonu sayısı vardır—aralığınız çok büyükse yaklaşımınızı değiştirmeniz veya baskı görevlerini bölmek zorunda kalabilirsiniz. Eklenen kesimleri geri almanız gerekiyorsa, Sayfa Düzeni sekmesi altında Tüm Sayfa Sonlarını Sıfırla seçeneğini kullanabilirsiniz.

Özetle, küçük bir tabloyla çalışıp hassas manuel ayarlar gerektiren durumlarda mı yoksa otomasyon ve tekrarlanan biçimlendirmeye ihtiyaç duyulan büyük veri setleriyle mi çalıştığınızdan bağımsız olarak, Excel yerleşik manuel kontrollerden, VBA otomasyonuna ve Kutools for Excel gibi dostane GUI çözümlerine kadar farklı baskı ve raporlama senaryolarına uygun yöntemler sunar.

Demo: Excel'de her x satırda bir sayfa sonu ekleme

İlgili Makaleler:

• Excel'de sayfa sonu ekleme veya kaldırma