aylık toplamların yan yana yıllık raporlanması

[hikmet]

ne kadar uğraşsam da çalışmıyor. iyisimi vazgeçmek yoksa eve bile gidemeyeceğim. :kafa: :kafa: :kafa:

 

[hikmet]

bu konu ile ilgili bir fikri olan hocalarım arkadaşlarım var ise lütfen cevaplarını bekliyorum.

 

[hikmet]

levent hocam bu kodu bu konu için uyarlayabilirmiyim sizce, yani bir sayfaya satır açmayacak sütun açacak. (bu sizin yazdığınız bir kod)

Sub tamamla()

For a = [a65536].End(3).Row To 2 Step -1
If Cells(a - 1, "a") <> Cells(a, "a") - 1 And Cells(a, "a") <> 1 Then
Cells(a, "a").Insert
Cells(a, "a") = Cells(a + 1, "a") - 1
End If
Next
End Sub