Không tự động tính kết quả khi thay đổi NGAYCUOITHANG (1 người xem)

[Excel365]

Const d_NgaychuyenCP = #10/21/2004# 'Ngay chuyen Co Phan -------
'Ham tinh Nam cong tac =======================================================================
Function NamCT(ByVal d_Ngaynhanhoso As Double) As Double
If (Range("NGAYCUOITHANG")) <> "" Then
If d_Ngaynhanhoso <= d_NgaychuyenCP Then
NamCT = (Range("NGAYCUOITHANG") - d_NgaychuyenCP) / 365
Else
NamCT = (Range("NGAYCUOITHANG") - d_Ngaynhanhoso) / 365
End If
Else
NamCT = 0
End If
End Function


Nhờ các anh chị xem giúp em, khi em thay đổii giá tri NGAYCUOITHANG thì nó không tự tính ra kết quả năm làm việc mà phải click vào nó mới thay đổi kết quả.

 

[Hoàng Trọng Nghĩa]

Tôi nghĩ tổng quát hơn bạn làm như vầy:

Function NamCT(ByVal dateHS As Double, _
               ByVal dateCP As Double, _
               ByVal dateEmonth As Double) As Double
    If dateHS <= dateCP Then
        NamCT = (dateEmonth - dateCP) / 365
    Else
        NamCT = (dateEmonth - dateHS) / 365
    End If
    If NamCT < 0 Then NamCT = 0
End Function

[COLOR=#008000]'Cấu trúc: =NamCT(NgayNhanHoSo,NgayChuyenCP,NgayCuoiThang)[/COLOR]

 

[Hoàng Trọng Nghĩa]

Nhờ các anh chị xem giúp em, khi em thay đổii giá tri NGAYCUOITHANG thì nó không tự tính ra kết quả năm làm việc mà phải click vào nó mới thay đổi kết quả.

À, hàm tự tạo thường không có tính update cao như hàm trong Excel, vì vậy, nếu có gì thay đổi trong hàm, bạn nên bấm phím F9 tại sheet nhé!

Còn nếu muốn kết quả không có số lẻ thì dùng hàm này:

Function NamCT(ByVal dateHS As Double, _
               ByVal dateCP As Double, _
               ByVal dateEmonth As Double) As Long
    If dateHS <= dateCP Then
        NamCT = (dateEmonth - dateCP) \ 365
    Else
        NamCT = (dateEmonth - dateHS) \ 365
    End If
    If NamCT < 0 Then NamCT = 0
End Function

 

[Excel365]

Mình cám ơn bạn nhe, Nếu nó không có tự động update thì mình kho kiểm sót lắm. Lỡ như sai thì mình tiêu luôn bạn ơi

 

[Hoàng Trọng Nghĩa]

Mình cám ơn bạn nhe, Nếu nó không có tự động update thì mình kho kiểm sót lắm. Lỡ như sai thì mình tiêu luôn bạn ơi

Tôi đã nói rồi, khi sửa Hàm tự tạo thì bạn sử dụng F9 nếu hàm đó đang được sử dụng. Còn không thì cứ save lại rồi thoát ra, lần mở sau nó cũng tự cập nhật thôi. Mà hình như bấm Save nó cũng cập nhật lại rồi thì phải.