Excel elektronik tablosunda her sayfaya farklı üstbilgi veya altbilgi nasıl eklenir?
Varsayılan olarak, bir Excel çalışma sayfasına eklediğiniz üstbilgi veya altbilgi, tüm yazdırılan sayfalara aynı şekilde uygulanır. Bu standart davranış, tutarlılık sağladığı için oldukça kullanışlıdır; ancak bazı durumlarda her sayfanın farklı bilgiler içermesi gerekebilir. Örneğin, finansal raporlar, öğrenci listeleri ya da birden fazla bölümden oluşan formlar yazdırılırken, her sayfa için özelleştirilmiş üstbilgi ve altbilgiler çıktıyı daha anlaşılır hale getirir ve bölümleri birbirinden ayırt etmeyi kolaylaştırır. Ancak Excel’in yerleşik araçları, gelişmiş yöntemlere başvurmadan tüm sayfalar için yalnızca tek bir üstbilgi veya altbilgi tanımlamanıza izin verir. Şimdi, Excel çalışma sayfanızda her sayfa için benzersiz üstbilgi ve altbilgiler nasıl oluşturabileceğinizi adım adım inceleyelim.
Her sayfaya VBA koduyla farklı üstbilgi veya altbilgi uygulama
Her sayfaya VBA koduyla farklı üstbilgi veya altbilgi uygulama
Aşağıdaki çözüm, her yazdırılan sayfaya önceden belirlenmiş üstbilgi veya altbilgiler atamak için bir VBA makrosu kullanır. Bu yöntem, belgenizin her bölümüne (örneğin bölümler, sınıflar veya aylık raporlar) benzersiz bir tanımlayıcı eklemeniz gerekiyorsa son derece kullanışlıdır. Süreç başlangıçta biraz kurulum gerektirse de, yapılandırıldıktan sonra farklı bölümleri ayrı üstbilgi ve altbilgi içerikleriyle hızlıca yazdırmanıza olanak tanır.
1. Alt+F11 tuşlarına aynı anda basarak Microsoft Visual Basic for Applications penceresini açın.
2. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül seçeneğine tıklayın. Ardından aşağıdaki VBA kodunu Kod penceresine kopyalayıp yapıştırın. Makrolara yeni başladıysanız, modüllerin VBA kodunun yürütülmesi amacıyla saklandığı bölümler olduğunu bilmeniz faydalı olacaktır. Yönlendirme için ekran görüntüsüne başvurun:
VBA kodu: Excel’de her sayfaya farklı üstbilgiler uygulama
Sub DifferentHeaderFooter()
Dim ws As Worksheet
Dim vLeft As Variant, vRight As Variant, xRg As Variant
Set ws = ActiveSheet
On Error Resume Next
vLeft = Array("First page", "Second page", "Third page", "fourth page")
xRg = Array("A1:C50", "A51:C100", "A101:C150", "A151:C200")
Application.ScreenUpdating = False
For i = 0 To UBound(vLeft)
With ws.PageSetup
.PrintArea = xRg(i)
.LeftHeader = vLeft(i)
End With
ws.PrintPreview
Next i
Application.ScreenUpdating = True
ws.PageSetup.PrintArea = ""
End Sub
Notlar ve parametre açıklamaları:
3. Makroyu çalıştırmak için F5 tuşuna basın. Bu işlem, kodu çalıştırır ve Önizleme penceresini açar. Burada, her tanımlı bölümü atanmış üstbilgisi veya altbilgisiyle yazdırmaya başlamak için Yazdır düğmesine tıklayın.
Not: Çalışma sayfanızda 4 adet baskı alanı belirtilmişse, tüm sayfaları bireysel üstbilgi veya altbilgilerle yazdırmayı tamamlamak için Yazdır düğmesine dört kez—her bölüm için bir kez—tıklamanız gerekir. Bunun nedeni, makronun her bölümü sırayla yazdırması; bu yüzden her bölüm için yazdırma eylemini tekrarlamanız gerekiyor.
Özetle, Excel tek bir çalışma sayfası içinde her sayfa için yerel olarak benzersiz üstbilgi veya altbilgi sağlamasa da, VBA makroları pratik ve özelleştirilebilir bir çözüm sunar. Ayarlarınızı ve yazdırılmış çıktınızı her zaman doğrulayın ve karmaşık senaryolar için alternatif yaklaşımları değerlendirin. Yazdırılan sayfaları sıklıkla kişiselleştirmeniz gerekiyorsa, bu işlemi VBA ile otomatikleştirmek için harcayacağınız çaba, önemli ölçüde manuel iş yükünden kurtarabilir.
KUTOOLS AI ile Excel'in Sihirli Gücünü Açığa Çıkarın
- Akıllı Yürütme: Hücre işlemlerini gerçekleştirin, verileri analiz edin ve hepsi basit komutlarla çalışan grafikler oluşturun.
- Özel formüller: İş akışlarınızı kolaylaştırmak için özelleştirilmiş formüller oluşturun.
- VBA Kodlama: VBA kodlarını zahmetsizce yazın ve uygulayın.
- Formül Yorumlama: Karmaşık formülleri kolayca çözmek artık çok daha basit!
- Metin Çevirisi: Elektronik tablolarınızda dil bariyerlerini aşın.
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