Makro ile Özel Üst Bilgi Ekleme

Bu dosya, Excel VBA ile yazdırılan sayfalara otomatik üst bilgi (başlık) eklenmesini gösteren bir örnektir. Üst bilgi metni, çalışma kitabı her açıldığında makro tarafından Sayfa1 için yeniden oluşturulur.

Dosyanın içeriği​

• Sayfa1: E4:E6 aralığında örnek veriler bulunur. Sayfada formül yoktur; üst bilgi, yazdırma ayarları üzerinden makro ile atanır.
• BuÇalışmaKitabı (ThisWorkbook) modülü: Workbook_Open olayını içeren 3 satırlık makro kodu yer alır.

Makrolar​

Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.

• Workbook_Open: Çalışma kitabı açılırken otomatik çalışır. Sayfa1 sayfasının PageSetup.CenterHeader özelliğine ortalanmış bir üst bilgi yazar. Yazı tipi Segoe UI, biçim kalın, boyut 15 punto olarak ayarlanır.
• Üst bilgi metni, EoMonth ile bulunan içinde bulunulan ayın son gününün tarihinden oluşur. Tarih "gün ay yıl gün adı" biçimindedir ve sonuna "Tarihli Rapor" ifadesi eklenir.
• Kodda dosya silme ya da dışarıya bağlantı gibi işlem yoktur; makro yalnızca sayfa yazdırma ayarını değiştirir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1 üzerinde yazdırma önizlemesini açın; üst bilgide ay sonu tarihli rapor başlığı görünür.
3. Yazı tipini, boyutu ya da metni değiştirmek için Alt+F11 ile VBA düzenleyicisini açın ve BuÇalışmaKitabı modülündeki Workbook_Open prosedürünü düzenleyin.
4. Kendi çalışma kitabınızda kullanmak için aynı prosedürü ilgili modüle kopyalayın ve sayfa adını kendi sayfanıza göre değiştirin.