code thông báo sắp hết hạn

[quoc nhat]

Xin chào các anh chị!
Em có một câu hỏi muốn nhờ các anh chị giải đáp giùm:
Ví dụ: Em đánh vào một Cell bất kì là hạn sử dụng: 10/10/2012
theo lịch máy tính hôm nay là 5/10/2012 ( cách 5 ngày trước khi hết hạn)
Vậy có code nào có thể hiện masage :"sắp hết hạn! hết hạn vào ngày 10/10/2012" vào trước 5 ngày trước khi hết hạn được không?
Mong được chỉ bảo
Em cảm ơn!

 

[quoc nhat]

nói thật là em đang làm công tác quản lý dược cho một trạm y tế nên rất phải nắm chắc được thời hạn sử dụng của thuốc và theo dỏi nếu thuốc hết hạn thì làm thủ tục hủy thuốc.
Vì rất nhiều thuốc nên không thể tháng nào cũng lật từng loại thuốc ra mà kiểm tra hạn được nên em nghỉ đến Excel nhưng không biết viết code thế nào cả.

 

[PhanTuHuong]

Xin chào các anh chị!
Em có một câu hỏi muốn nhờ các anh chị giải đáp giùm:
Ví dụ: Em đánh vào một Cell bất kì là hạn sử dụng: 10/10/2012
theo lịch máy tính hôm nay là 5/10/2012 ( cách 5 ngày trước khi hết hạn)
Vậy có code nào có thể hiện masage :"sắp hết hạn! hết hạn vào ngày 10/10/2012" vào trước 5 ngày trước khi hết hạn được không?
Mong được chỉ bảo
Em cảm ơn!

Bạn dùng lập trình sự kiện là được, còn cái đo đỏ nghe chừng không liên quan đến Excel.

 

[Chanxu]

bạn thử áp dụng thế này xem sao:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Day([a1]) - Day(Now()) > 5 Then
MsgBox "Qua han"
Else
End If
End Sub

 

[PhanTuHuong]

Bạn tải file này và bổ sung code nhé. Nhớ kiểu định dạng ngày/tháng/năm trong ô B2.

 

[quoc nhat]

bạn tải file này và bổ sung code nhé. Nhớ kiểu định dạng ngày/tháng/năm trong ô b2.

định dạng bạn gửi cho minh máy của minh không xài được, chỉ xài được .xls thôi bạn ạ.

 

[quoc nhat]

bạn thử áp dụng thế này xem sao:
Private sub worksheet_selectionchange(byval target as range)
if day([a1]) - day(now()) > 5 then
msgbox "qua han"
else
end if
end sub

nếu viết cho khoảng 200 ngày tháng khác nhau cho 200 cell thì sao hả bạn?

 

[ngoloi17]

nếu viết cho khoảng 200 ngày tháng khác nhau cho 200 cell thì sao hả bạn?

Bạn dùng công thức mình nghĩ còn hay hơn đó bạn...

 

[Chanxu]

đấy là tôi ví dụ thế. chứ biết cái file của bạn cần thế nào đâu.
200 dòng. hơi ít. dùng công thức.
nhiều hơn dùng macro. làm biến chạy các ô bạn cần. không thì tốt hơn cả bạn nên gửi hẳn file demo thì sẽ rõ hơn thôi.

 

[Quang_Hải]

Xin chào các anh chị!
Em có một câu hỏi muốn nhờ các anh chị giải đáp giùm:
Ví dụ: Em đánh vào một Cell bất kì là hạn sử dụng: 10/10/2012
theo lịch máy tính hôm nay là 5/10/2012 ( cách 5 ngày trước khi hết hạn)
Vậy có code nào có thể hiện masage :"sắp hết hạn! hết hạn vào ngày 10/10/2012" vào trước 5 ngày trước khi hết hạn được không?
Mong được chỉ bảo
Em cảm ơn!

Nhìn vào là biết bạn muốn hạn chế thời gian sử dụng của code rồi đúng không?
Nếu đúng thì hãy quên đi suy nghĩ này nhé.
Nếu bạn muốn quản lý thời hạn sử dụng của thuốc trước khi hết hạn sử dụng vài ngày thì e rằng vô lý quá

 

[PhanTuHuong]

Bạn tải file này và bổ sung code nhé. Nhớ kiểu định dạng ngày/tháng/năm trong ô B2.

Tôi nghĩ dùng hàm Day360 thì chuẩn hơn, vì có trường hợp liên quan đến tháng khác nhau nên ngày tính trừ không chính xác. Tải lại ở đây.

 

[quoc nhat]

Nhìn vào là biết bạn muốn hạn chế thời gian sử dụng của code rồi đúng không?
Nếu đúng thì hãy quên đi suy nghĩ này nhé.
Nếu bạn muốn quản lý thời hạn sử dụng của thuốc trước khi hết hạn sử dụng vài ngày thì e rằng vô lý quá

cái này dùng để biết thuốc nào hết hạn để làm lảm thủ tục hủy thuốc thôi anh chứ cứ để thuốc hết hạn trong kho thì chắc là không ổn rồi
Anh xem có cách nào tối ưu nhất thì giúp em với

 

[dongducnhiem]

cái này dùng để biết thuốc nào hết hạn để làm lảm thủ tục hủy thuốc thôi anh chứ cứ để thuốc hết hạn trong kho thì chắc là không ổn rồi
Anh xem có cách nào tối ưu nhất thì giúp em với

Theo tôi nếu bạn có nhiều loại thuốc khác nhau, trên 200 loại, như vậy hộp thông báo chỉ hiện ra mỗi khi bạn nhập ngày, làm như vậy sao kiểm soát hết được?
Fương án của bạn dùng C.F là tối ưu nhất thôi!

 

[quoc nhat]

đây là file của em.
hạn dùng ở cột H sheet "Thẻ kho"
Đây em mới làm được ít loại thuốc thôi chứ còn nhiều loại nữa em chưa làm kịp.
Các anh chị xem giúp

 

[quoc nhat]

vậy có code nào giống kiểu mình hẹn giờ báo thức ở điện thoại không các anh chị? đến ngày tháng đó thì nó báo

 

[quoc nhat]

Theo tôi nếu bạn có nhiều loại thuốc khác nhau, trên 200 loại, như vậy hộp thông báo chỉ hiện ra mỗi khi bạn nhập ngày, làm như vậy sao kiểm soát hết được?
Fương án của bạn dùng C.F là tối ưu nhất thôi!

sao làm vậy được. mình nhập ngày tháng trước đó mầy tháng có khi cả năm chứ!

 

[Chanxu]

chịu rồi. ai đi nhờ giúp lại còn đặt mật khẩu cho file thế này không cơ chứ. mở cũng được nhưng chắc chủ topic cũng không NHIỆT lắm.

 

[quoc nhat]

chịu rồi. ai đi nhờ giúp lại còn đặt mật khẩu cho file thế này không cơ chứ. mở cũng được nhưng chắc chủ topic cũng không NHIỆT lắm.

Xin lỗi anh em quên khấy đi mất
Mật khẩu đây anh: 12111987

 

[dongducnhiem]

sao làm vậy được. Mình nhập ngày tháng trước đó mầy tháng có khi cả năm chứ!

xem file nhá!!!!!!!!!!!!!!!!

 

[quoc nhat]

xem file nhá!!!!!!!!!!!!!!!!

cảm ơn bạn nhiều nhé!
bạn cho mình hỏi. có phải thuốc nào gần hết hạn < = 5 ngày sẽ có màu đỏ phải không?