Hiện em đã tham khảo 1 số bài và chỉnh sửa trong macro mà vẫn không chạy, bro nào rành giúp em với.
Trong bảng Exl cột "due on" là tới ngày mình phải tra tiền cho khách hàng, em mún thêm 1 macro với chức năng là khi mở file exl thì sẽ tự đông hiện thông báo là hôm nay sẽ phải trả tiền cho những đơn hàng nào dựa theo ngày "due on" và áp dụng cho tất cả các sheet trong file lun,
code của em chỉ là tham khảo rồi sửa lại nhưng vẫn bó tay vì ko có kiến thức lập trình
link file của em, ko hiu sao em att trên 4rum ko dc file em có 9.4kb @@
http://www.mediafire.com/?sharekey=b97ac0bbd7113d745a3d773badf21430e04e75f6e8ebb871
Trong bảng Exl cột "due on" là tới ngày mình phải tra tiền cho khách hàng, em mún thêm 1 macro với chức năng là khi mở file exl thì sẽ tự đông hiện thông báo là hôm nay sẽ phải trả tiền cho những đơn hàng nào dựa theo ngày "due on" và áp dụng cho tất cả các sheet trong file lun,
code của em chỉ là tham khảo rồi sửa lại nhưng vẫn bó tay vì ko có kiến thức lập trình
PHP:
Sub Auto_Open()
Dim Clls As Range, StrC As String
With Sheets("AR 08.09")
For Each Clls In Range(.[D7], .[D7].End(xlDown))
If Clls = Format(Date, "mm/dd/yy") Then
StrC = .[A1] & Chr(10) & Clls.Offset(, 1) & ": " & Clls
Application.ExecuteExcel4Macro ("ALERT(""" & StrC & """,2)")
End If
Next Clls
End With
End Sub
link file của em, ko hiu sao em att trên 4rum ko dc file em có 9.4kb @@
http://www.mediafire.com/?sharekey=b97ac0bbd7113d745a3d773badf21430e04e75f6e8ebb871
Lần chỉnh sửa cuối: