Ekli dosyada İCMAL_2 sayfasında bulunan verileri macro ile Toplam başlığı altında topluyorum.
Benim yapamadığım :
Her yıl 15 Haziran tarihinden sonra
Excel ilk açılışında İCMAL_2 sayfası toplam başlığı altında olan verileri kopyalayıp YILLIK_İCMAL sayfasında örnekte gösterdiğim gibi 1. sütunlara başlık olarak içinde bulunduğu yılı yazarak altına İCMAL_2 de toplam başlığı altındaki verileri kopyalaması ve tablo yapması
Ben örnek olarak bir kaç yıl ekledim. Ama otomotik olarak içinde bulunduğu yılı 1. Satıra eklemesi gerekiyor. 2022 olunca kopyalamaya 2022 satırının altına 2023 olunca eski verilere dokunmadan 2023 altında toplam verileri kopyalacak.
Yardımcı olabilecek olan varsa çok sevinirim.
Konuyu yeniden izah etmeye çalışayım.
her yıl 15 Hazirandan sonra dosya her açılışında YILLIK_İCMAL sayfasının b sütunundan başlamak üzere
içinde bulunduğumuz yıl 2021 .
O halde B1 de 2021 yazacak ve İCMAL_2 sayfamızın F2 F18 arasını kopyalayarak YILLIK_İCMAL sayfasına B2 B18 arasına kopyalayacak
içinde bulunduğumuz yıl 2022 .
O halde C1 de 2022 yazacak ve İCMAL_2 sayfamızın F2 F18 arasını kopyalayarak YILLIK_İCMAL sayfasına C2 C18 arasına kopyalayacak
içinde bulunduğumuz yıl 2023
O halde D1 de 2023 yazacak ve İCMAL_2 sayfamızın F2 F18 arasını kopyalayarak YILLIK_İCMAL sayfasına D2 D18 arasına kopyalayacak
Aşağıda bir şeyler yapmaya çalıştım ama takıldım olmadı yani
Private Sub Workbook_Open()
Set vs = ThisWorkbook.Sheets("İCMAL_2")
If Date > DateValue("15/06/" & vs.[N1] + 1) Then vs.[N1] = Year(Date) - 1
If Date >= DateValue("15/06/" & vs.[N1]) And _
Date <= DateValue("14/06/" & vs.[N1] + 1) Then
İşlem Kodları gelse sonrasında vs.[N1] = vs.[N1] + 1
End If
End Sub 
