I am trying to fill blank cells in a column with today's date if they are blank. However, if there is a date, I would like that to stay as is.
This is what I have but it errors:
Dim lrB As Long
lrB = ws1.Cells(Rows.Count, "I".End(xlUp).Row
If Cells.Range("E2:E" & lrB) = "" Then
Range("E2") = Date
I have tried other ways but in vain.