جمع زدن در group و subtotal

[ali719]

سلام
توی این فایل من از گروپ استفاده کردم میشه با انجام همین کار بدون استفاده از فرمول در سلول b2 و b6 جمع زده شود وb1 در قسمت جمع کلی مقدار کل نمایش داده شود (subtotal or group)

[esiexcel]

سلام
این کد رو در vba بنویسید و اجرا کنید. اگه راضی کننده بود میتونین یک شکل در صفحه اکسل insert کنید و ماکرو رو به اون assign کنید.

()Sub sub_esi
For i = 3 To 5
n = n + Cells(i, 2)
Next i
Cells(2, 2) = n
For i = 7 To 9
m = m + Cells(i, 2)
Next i
Cells(6, 2) = m
Cells(1, 2) = m + n
End Sub