Excel'de her satırı/hücreyi ayrı bir sayfaya nasıl yazdırabilirsiniz?

Eğer bir satır, bir yazdırma sayfasını kaplayacak kadar yüksekse, o satır tek bir sayfaya yazdırılır. Bu nedenle, bu yöntem size her satırı/hücreyi Excel'de ayrı bir sayfaya yazdırmak için satır yüksekliğini ayarlamanızı sağlayacak.

1. Tıklayın Sayfa Düzeni > Kenar Boşlukları > Özel Kenar Boşlukları.

2. Açılan Sayfa Düzeni iletişim kutusunda, hem Üst kutusuna hem de Alt kutusuna 2.5 yazın ve Tamam düğmesine tıklayın.

Not: Üst kenar boşluğu ve alt kenar boşluğu sayıları kağıt boyutunuza göre farklılık gösterebilir. Durumunuza göre ayarlamanız gerekebilir.

3. Her birini tek bir sayfada yazdırmak istediğiniz tüm satırları seçin, satır başlığına sağ tıklayın ve Satır Yüksekliği öğesini sağ tıklama menüsünden seçin.

4. Açılan Satır Yüksekliği iletişim kutusunda, Satır yüksekliği kutusuna 250 yazın ve Tamam düğmesine tıklayın.

5. Tıklayın Dosya (veya Office düğmesi)> Yazdır, Yazdırma Önizleme alanında her satırı ayrı bir sayfada aşağıdaki ekran görüntüsünde gösterildiği gibi göreceksiniz ve Yazdır düğmesine tıklayarak yazdırın.

Burada ayrıca, Excel'de her satırı/hücreyi ayrı bir sayfaya yazdırmak için bir VBA kodu da sunuyoruz.

1. Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına aynı anda basın.

2. Ekle > Modül'e tıklayın ve ardından aşağıdaki kodu açılan Modül penceresine yapıştırın.

VBA: Excel'de her satırı/hücreyi ayrı bir sayfaya yazdırma

Sub PrintOneLine()
Dim Rng As Range
Dim WorkRng As Range
Dim xWs As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set xWs = WorkRng.Parent
For Each Rng In WorkRng
xWs.PageSetup.PrintArea = Rng.EntireRow.Address
xWs.PrintPreview
Next
End Sub

3. Bu VBA'yı çalıştırmak için F5 tuşuna basın veya Çalıştır düğmesine tıklayın. Ardından bir iletişim kutusu açılacak, lütfen her satırı ayrı bir sayfaya yazdırmak istediğiniz alanı belirtin ve Tamam düğmesine tıklayın.

4. Şimdi her satır ayrı bir Yazdırma Önizleme penceresinde önizlenmektedir. Tüm satırlar yazdırılana kadar her Yazdırma Önizleme penceresinde Yazdır düğmesine tek tek tıklamanız gerekir.

Eğer Kutools for Excel yüklüyse, Veriyi Böl yardımcı programı size Excel'de her satırı/hücreyi ayrı bir sayfaya yazdırmada kolaylık sağlar.

1. Tıklayın Kutools Plus > Veriyi Böl.

2. Açılan Veriyi Böl iletişim kutusunda şunları yapmanız gerekir:

(1) Başlık Aralığı kutusunda, her yazdırılan sayfanın üstüne ekleyeceğiniz başlık aralığını belirtin;
(2) Veri Aralığı kutusunda, her satırı ayrı bir sayfaya yazdırmak istediğiniz veri aralığını belirtin;
(3) Sayfa Başına Satır Sayısı kutusuna 1 yazın;
(4) Sayfa Başına Sütun Sayısı kutusuna 1 yazın.
(5) Tıklayın Tamam düğmesine tıklayın.

Ardından, her satırın yeni bir çalışma sayfasında tek bir yazdırma sayfasına bölündüğünü ve belirtilen başlık aralığının her yazdırma sayfasına eklendiğini göreceksiniz. Aşağıdaki ekran görüntüsüne bakın:

Not: Her yazdırma sayfasını daha net görmek için, Görünüm > Sayfa Sonu Önizlemesi tıklayarak Sayfa Sonu Önizleme görünümüne geçebilirsiniz.

3. Dosya (veya Office düğmesi) > Yazdır'a tıklayın, her satır/hücrenin ayrı bir sayfada görüntülendiğini göreceksiniz.

Veriyi Böl yardımcı programının yanı sıra, Kutools for Excel, Excel'de her satırı ayrı bir sayfaya yazdırmak için başka bir Her Satıra Sayfa Sonu Ekle yardımcı programı geliştirdi.

1. Her satırı ayrı bir sayfaya yazdırmak istediğiniz alanı seçin ve Kutools Plus > Yazdır > Her Satıra Sayfa Sonu Ekle'ye tıklayın.

2. Açılan Her Satıra Sayfa Sonu Ekle iletişim kutusunda, 1 kutusuna Aralık yazın ve Tamam düğmesine tıklayın.

Ardından bir iletişim kutusu açılacak ve size kaç adet sayfa sonu eklendiğini bildirecek. Sadece Tamam düğmesine tıklayarak kapatın.

3. Her satırı ayrı bir sayfaya kolayca yazdırmak için Dosya (veya Office düğmesi) > Yazdır'a tıklayın.