hello
i have this code doesn't work very well as my condition it should show data based on col f =<14 days in my case it shows only 12 days as in my data it suposses showing also 8 days and 14 day as my condition and i would show one message show all data contain depending on condition like this
name case due
asd125 EXPIRED 12days
asd126 LONG TERM 8days
asd127 EXPIRED 14days
asd128 LONG TERM 14days
HTML Code:Sub WorkSheet_Calculate() Dim LR As Long, i As Long, j As Long LR = Range("A" & Rows.Count).End(xlUp).Row For i = 2 To LR If Range("F" & i).Value <= 14 & Days Then MsgBox "..CONTRACT ALMOST ENDED.." & vbLf & vbLf & " Name : " & Range("B" & i).Value & " " & "case : " & Range("c" & i).Value & " " & "due : " & Range("f" & i).Value j = j + 1 End If Next i If j = 0 Then MsgBox "No Renewal for today" End Sub
Bookmarks