Excel'de yalnızca tek veya çift sayfaları nasıl yazdırabilirim?
Ancak Excel’in Yazdır iletişim kutusu yalnızca tek veya yalnızca çift sayfaları yazdırmak için açık ve doğrudan bir yol sunmaz; bu durum, uzun bir çalışma sayfasından belirli sayfaları incelemek, dağıtmak veya arşivlemek istediğiniz çeşitli ofis veya veri raporlama senaryolarında rahatsız edici olabilir.
Bu makale, Excel’deki bu sınırlamaya yönelik iki etkili çözüm sunmaktadır. Hem tek/çift sayfaları yazdırmak için bir VBA makrosu hem de Kutools for Excel kullanarak daha esnek bir yaklaşım bulacaksınız; böylece ihtiyaçlarınıza ve teknik konfor seviyenize en uygun yöntemi seçebilirsiniz.
Makro koduyla yalnızca tek veya çift sayfaları yazdırma
İstediğiniz gibi tek, çift veya belirli sayfaları Kutools for Excel ile yazdırma
Alternatif Çözüm: Yazdırma İletişim Kutusu Üzerinden Tek veya Çift Sayfaları Manuel Olarak Yazdırma
Makro koduyla yalnızca tek veya çift sayfaları yazdırma
Excel'in yazdırma arayüzünde doğrudan tek/çift sayfa seçeneği olmasa da, bu işlemi bir VBA makrosuyla kolayca gerçekleştirebilirsiniz. Bu yöntem, basit kodları rahatça çalıştıran ve üçüncü parti araçlara başvurmadan çözüm arayan kullanıcılar için idealdir. Özellikle bir kerelik yazdırma görevlerinde veya karmaşık yazdırma yönetimine sık sık ihtiyaç duymayan kullanıcılar için son derece pratiktir.
Başlamadan önce, çalışma sayfanızın yazdırma için doğru şekilde biçimlendirildiğinden ve Yazdırma Önizlemesi’nde kaç sayfa çıktısının alınacağını doğruladığınızdan emin olun. Böylece beklenmedik sayfa sonları nedeniyle boş veya gereksiz çıktılar almaktan kaçınırsınız.
1. Yazdırmak istediğiniz çalışma sayfasını açın ve Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications (VBA) düzenleyicisini başlatın.
2. VBA düzenleyicide yeni bir modül eklemek için Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu betik penceresine yapıştırın. Yönlendirme için ekran görüntüsüne bakın.
VBA: Yalnızca tek veya çift sayfaları yazdırma
Sub Odd_Even_Print()
'UpdatebyExtendoffice20160901
Dim xTotalPages As Long
Dim xStartPage As String
Dim xPage As Integer, xYesorNo
Application.ScreenUpdating = False
xStartPage = InputBox("Enter 1 for Odd, 2 for Even", "Kutools for Excel")
If xStartPage = "" Then Exit Sub
xTotalPages = ActiveSheet.PageSetup.Pages.Count
xYesorNo = MsgBox("Are you sure to print?", vbYesNo, "Kutools for Excel")
If xYesorNo = vbYes Then
For xPage = Int(xStartPage) To xTotalPages Step 2
ActiveSheet.PrintOut from:=xPage, To:=xPage
Next
Else
Exit Sub
End If
Application.ScreenUpdating = True
End Sub
Kodu kopyalayıp yapıştırırken, mevcut makroların üzerine yazılmamasına dikkat edin—bunlar ileride ihtiyacınız olabilecek değerli içeriklerdir.
3. Makroyu çalıştırmak için F5 tuşuna basın. Seçiminizi belirtmeniz için bir istem penceresi açılacaktır: Yalnızca tek numaralı sayfaları yazdırmak istiyorsanız 1, çift numaralı sayfalar için ise 2 girin.
Not: Yanlış giriş (1 veya 2) makronun beklendiği gibi çalışmasını engelleyebilir. Geçersiz bir değer girerseniz, makro genellikle sizi uyarır ya da hiçbir işlem yapmaz.
4. Seçiminizi girdikten sonra Tamam'a tıklayın. Yazdırmaya gerçekten devam etmek istediğinizi soran ikinci bir onay iletişim kutusu açılacaktır. Bu, yanlışlıkla yazdırmayı önlemek için alınan bir güvenlik önlemidir.
Yazdırmadan önce iptal etmek istiyorsanız bu iletişim kutusunda Hayır'a tıklayın; devam etmek için ise Evet'e tıklayın.
5. Onay verdikten sonra Excel, etkin çalışma sayfasının yalnızca belirttiğiniz tek veya çift sayfalarını varsayılan yazıcınıza gönderecektir.
Sorun giderme ve ipuçları:
- Bu makro, yalnızca şu anda etkin olan çalışma sayfası üzerinde çalışır. Birden fazla çalışma sayfasını yazdırmak istiyorsanız, her biri için makroyu ayrı ayrı çalıştırmalısınız.
- Makroyu çalıştırmadan önce yazıcı ayarlarınızı kontrol edin; Excel’in Yazdır iletişim kutusunda doğru yazıcının seçili olduğundan emin olun.
- Hiçbir şey yazılmamışsa, Baskı Alanı’nı yeniden kontrol edin ve çalışma sayfanızın yazdırılmak üzere boş ya da hatalı biçimlendirilmemiş olduğundan emin olun.
İstediğiniz gibi tek, çift veya belirli sayfaları Kutools for Excel ile yazdırın
Çalışma sayfalarınızdan sık sık tek, çift ya da birden fazla belirli sayfayı yazdırmanız gerekiyorsa, Kutools for Excel son derece verimli bir çözüm sunar. Bu yaklaşım, karmaşık yazdırma işlemlerini yönetmek için daha sezgisel ve kullanıcı dostu bir arayüz arayan kullanıcılar için idealdir. Kutools for Excel ile yalnızca tüm tek veya çift sayfaları seçmekle kalmaz, aynı zamanda Excel’in yerleşik özellikleriyle veya basit makrolarla kolayca gerçekleştirilemeyen rastgele özel sayfa aralıklarını da belirleyebilirsiniz.
Kutools for Excel'i ücretsiz yükledikten sonra, çeşitli yazdırma ihtiyaçlarınızı verimli şekilde karşılamak için ücretsiz yükleyinKutools for Excel'in Belirtilen Sayfaları Yazdıryardımcı programını kullanabilirsiniz:
Bunu yapmak için KUTOOLS PLUS > Yazdırma > Belirtilen Sayfaları Yazdır yolunu izleyin. Belirtilen Sayfaları Yazdır iletişim kutusu açılacak ve burada yazdırma gereksinimlerinize göre seçenekleri seçebileceksiniz.
 |  |  |
Bu iletişim kutusunda şunları yapabilirsiniz:
- Varsayılan Excel yazdırma seçeneklerine kıyasla çok daha fazla esneklik sunar; tüm tek sayfaları, tüm çift sayfaları yazdırabilir veya ihtiyaçlarınıza uygun bir Özel Aralık belirleyebilirsiniz.
- Doğru sayfaları yazdırdığınızdan emin olmak ve gereksiz baskı israfını önlemek için seçiminizi kolayca önizleyin.
İpucu:
1. 1, 3, 5 ve 9 ila 12 gibi özel bir sayfa kümesi yazdırmak için Özel Aralıkseçeneğini belirleyin ve belirtilen alana aralığınızı girin (örneğin,)1, 3, 5, 9-12).
2. Kopya sayısını kontrol etmek için Kopya ayarından istediğiniz adedi belirtin ve seçtiğiniz sayfaların birden fazla kopyasını yazdırın.
3. Çalışma sayfalarını ters çevirerek yazdırmak istiyorsanız, Ters sırayla yazdır seçeneğini işaretleyin. Bu özellikle, yazdırdıktan sonra sayfaları düzenlemesi zor olan büyük yazdırma işleri için oldukça yararlıdır.
Uyarılar ve öneriler:
- Kutools’ın yazdırma özelliklerinden doğru sonuç almak için, çalışma sayfanızdaki Sayfa Sonu ve Baskı Alanını önceden kontrol edin.
- Aralık seçerek yazdırıyorsanız, gizli satır veya sütunların Sayfa Düzeni'ne bağlı olarak yine de çıktıya dahil edilebileceğini unutmayın.
- Özellikle büyük veya kritik belgelerde, nihai yazdırmadan önce çıktıyı onaylamak için her zaman Yazdırma Önizlemesi’ni kullanın.
- Bu yöntem aynı anda yalnızca bir çalışma sayfasında etkilidir; ek sayfalar için gerektiği kadar tekrarlayın.
Avantajlar: Kutools for Excel, tekrarlayan görevlerde çalışanlar, karmaşık raporlarla uğraşan kullanıcılar veya yazdırma hatalarını en aza indirmek isteyen herkes için idealdir. Arayüzü kodlama bilgisi gerektirmez ve özel yazdırma senaryoları için VBA çözümlerinden çok daha esnektir.
Alternatif Çözüm: Yazdırma İletişim Kutusu Üzerinden Tek veya Çift Sayfaları Manuel Olarak Yazdırma
VBA veya üçüncü parti araçlar kullanmak istemiyorsanız, Excel’de tek ya da çift sayfaları manuel olarak yazdırabilirsiniz; ancak Yazdırma iletişim kutusu aynı anda yalnızca bir sayfa aralığı yazdırmaya izin verir. Excel, Sayfalar kutusuna bitişik olmayan birden fazla sayfa (örneğin, 1,3,5) girmeyi desteklemez.
Tek veya çift sayfaları manuel olarak yazdırmak için:
- Şuraya gidin: Dosya > Yazdır.
- İlk Sayfa alanındaki “İlk Sayfa” kutusuna tek bir sayfa numarası (örneğin, 1) girerek yalnızca o belirli sayfayı yazdırın. From kutusundan yalnızca o sayfayı yazdırmak için.
- Yazdır’a tıklayın.
- Gerektiğinde tek veya çift sayfalar için bu işlemi tekrarlayın.
Demo: İstediğiniz gibi tek, çift veya belirli sayfaları Kutools for Excel ile yazdırma
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar