استفاده از تابع SUM در VBA

تابع SUM مانند دیگر توابع اکسل به صورت یک متد برای شیء WorhSheetFunction تعریف شده است و به صورت متد قابل استفاده می باشد. ماکروی زیر جمع محدوده A1:B15 را در خانه D5 محاسبه می کند.

Sub TestSum() Dim myRange As Range Set myRange = Sheets(1).Range("A1:B15") Sheets(1).Range("D5").Value = WorksheetFunction.Sum(myRange) End Sub

نویسنده : وحید فرزام