WorksheetFunction.SumIfs() trong VBA tính sai

[nvhieutk]

nhờ các bác giúp em sao code tính sai kết quả (D48 có số liệu số tiền, B4:B8 có số liệu ngày):
WorksheetFunction.SumIfs(ws.Range("D48"), _
ws.Range("B4:B8"), ">=" & tungay, ws.Range("B4:B8"), "<=" & denngay)

 

[ptm0412]

Ủa mà khoan! Bài 13 nói:

Lưu ý từ "số nguyên" có nghĩa là phần thập phân sẽ bị cắt bỏ. Dân chuyên VBA dùng tính chất này để cắt bỏ phần giờ phút trong biến kiểu Date.

Rồi bài 18 lại nói

"CLng bao gồm Round, .... Trong ví dụ sau đây, nếu phần thập phân lớn hơn hay bằng 0.5 thì CLng sẽ dùng Round để ép số".

Vậy thì đâu phải cắt bỏ? 1.5 cắt xong bị tăng lên 1 thành 2 sao?