Sayfa Özel Altbilgi Tarih ve Sayfa Numarası

[YasarPiskin]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Sayfa özel altbilgi sayfa numarası ve tarih (Cari ayın son günü) bilgisini örneğin &[Sayfa] / &[ToplamSayfa] &[Tarih] şeklinde ifade edersem 1/1 11.08.2022 şeklinde sonuç veriyor. Bunu nasıl ifade edeyim ki sonuç 1/1 31.08.2022 şeklinde olsun.

 

8 saatin üstü mesai 30dakika kesilme

Koşullu Biçimlendirme Mükerrer Kayıtlar

[AhmetRasim]

Merhabalar Sn. @YasarPiskin
Bu kod ile yapabilirsiniz.

    With ActiveSheet.PageSetup
        D = Format(WorksheetFunction.EoMonth(Date, 0), "dd.mm.yyyy")
        .CenterFooter = "&P / &N  " & D
    End With

 

[YasarPiskin]

Bu kodu nereye koymalıyım.

 

[AhmetRasim]

Dosya açılışında olmasını isterseniz Open kodlarına ekleyebilirsiniz, mevcutta kullandığınız kod varsa istediğiniz bir işlemden sonra da ekleyebilirsiniz ya da sayfa üzerindeki bir düğmeye atayıp çalıştırabilirsiniz.

 

[YasarPiskin]

Dosya açılışında olmasını isteyerek, Ek'te ki şekilde denedim fakat olmadı. Rica etsem kontrol edebilirimsiniz?

 

[AhmetRasim]

Workbook_Open kodlarının BuÇalışmaKitabı bölümünde olması gerekir.

Ocak sayfasına Alt Bilgi eklemek için kodları BuÇalışmaKitabı bölümüne ekleyiniz.

Private Sub Workbook_Open()
    With Sayfa3.PageSetup
        D = Format(WorksheetFunction.EoMonth(Date, 0), "dd.mm.yyyy")
        .CenterFooter = "&P / &N  " & D
    End With
End Sub

 

[YasarPiskin]

Çok teşekkür ederim.