پرسش جمع ساده در vba

[Meysam.1991]

با سلام :

میخوام در یک فایل اکسل a10:a20 رو با کد نویسی در vba جمع بزنم و بگم در b1 به من نمایش بده .

ممنون میشم کسی بتونه راهنمایی کنه


با تشکر

[iranweld]

با سلام

Sub TEST()

Sum = Application.Sum(Range("A1:A20"))

Range("b1") = Sum

End Sub