Hàm cộng tổng trong VBA

[phuong44e1 2]

Nhờ các bác chỉ giúp e với ạ,

E bị mắc cái hàm cộng tổng, công thức nó vẫn cộng nhưng không phân biết được âm hay dương, dấu thập phân mà cứ cộng các số vào với nhau nên sai số nhiều quá

Cụ thể: e đăt công thức tính thể tích: V = Cdai*Crong*Ccao*Hso

Khi đó chi tiết các đồi tượng cần tính V nó vẫn đúng, cho ra giá trị có cả thập phân hay số âm khi hệ số là âm

Nhưng khi e làm phép cộng tổng thể tích 10 đối tượng lại với nhau thì kết quả nó lại sai ( Cứ cộng các con số, ko phân biết thập phân, số âm)

Chẳng hạn như : 0.38 nó thay bằng 38

                              11.26 nó thay bằng 1126

                              -35.12 nó thay bằng 3522 để thực hiện phép cộng dồn.

Ở trên e khai báo thế này:

 

 .List(.ListCount - 1, 2) = Round(Cdai*Crong*Ccao*Hso, 2)

Và hàm cộng tổng e làm như sau: 

 

 TotalVolume = 0

 For j = 1 To .ListCount
            TotalVolume = Round(TotalVolume+ .List(j - 1, 2), 2)

 

Nó vẫn thực hiện phép cộng cho tâtcs cả các kết quả chi tiết trong cột nhưng lại chỉ nhận là số dương và không phân biệt thập phân.

Bác nào chỉ giúp e dùng hàm nào hay khai báo lại thế nào để phép cộng tổng nó nhận được đúng giá trị với ạ.

 

E cảm ơn nhiều.

[CadExTools 112]

Ktra định dạng giữa hệ thống và Excel. Trong Code luôn nhận "." làm ký tự cách giữa phần thập phân, còn Excel của bạn hoặc System đang là dấu ","

Bạn phải đổi lại 

[phuong44e1 2]

E cảm ơn bác nhiều nha, nó nhận số đúng rồi bác.