Hi
I have the below code that sends an email if tow conditions are met.
I have two questions:
Sub email()
Dim i As Long, lr As Long, scdata As String, myolapp As Object, myitem As Object
lr = Range("A" & Rows.Count).End(xlUp).Row
scdata = ""
For i = 19 To lr Step 1
If Cells(i, 21) <> 0 And...