Perhaps he did:Did you look at the solution I offered you at all? Your subsequent posts suggest not.
on issuance dates its highlighting all cells
Sub Demo1()
Const F = "IF(ISNUMBER(Q#:U#),IF(MONTH(Q#:U#)=MONTH(I#),ADDRESS(#,COLUMN(Q#:U#))))"
Dim L&, R&, V
L = UsedRange.Rows.Count
Application.ScreenUpdating = False
Range("I2:I" & L & ",Q2:U" & L).Interior.ColorIndex = xlNone
For R = 2 To L
V = Filter(Evaluate(Replace(F, "#", R)), False, False)
If UBound(V) > -1 Then Range("I" & R & "," & Join(V, ",")).Interior.ColorIndex = 35
Next
Application.ScreenUpdating = True
End Sub
yes, i did, i tried it out and even sent you a screenshot of how i would circumvent, as colour was reflected in all cells, none excepting. see #4Did you look at the solution I offered you at all? Your subsequent posts suggest not.
which may not be possible with larger files.