[حل شده] مشکل در تابع sumif در vba
وقت بخیر
با استفاده از app میخواهم جمع شرطی رو کدنویسی کنم و لی متاسفانه خطا میده و نمیدونم علت چیه؟
خطای overflow
با استفاده از app میخواهم جمع شرطی رو کدنویسی کنم و لی متاسفانه خطا میده و نمیدونم علت چیه؟
خطای overflow
کد:
Sub sum()
Dim d As Integer
Dim n As Integer
Dim sum As Integer
For n = 25 To 28
d = Sheet4.Cells(n, 1).Value
sum = Application.WorksheetFunction.SumIf(Sheet3.Range("n:n"), d, Sheet3.Range("j:j"))
Sheet4.Cells(n, 2).Value = sum
Next
End Sub