Hvis det er excel du har data i er det letteste at lave en makro.
følgende kode burde virke:
forudsætninger:
1) dine data står i sheet1
2) datoer i kolonne A på sheet1
3) der er ingen rækker uden dato
4) sheet2 har månednaven i række 1 og med januar som kolonne A
Dim total as long
Dim i as long
for m = 1 to 12
i = 1
total = 0
Do while sheet1.cells(i,"A") <> ""
If month(sheet1.cells(i,"A") = m then
total = total + Sheet1,ceells(i,"B")
end if
i = i + 1
loop
sheet2,cells(2,m) = total
next m
mvh
Peder